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ON THREE Presents... 
ONTIME Features: _ 


1) Time & Date displayed whenever YOU 
want it! 

2) Works with ALL programs! 

3) Displays the Day, Month, Year Hour, 
Minute and Second. 

4) Stop Watch/Timer Mode. 

5) An unbelievable enhancement to your 
Apple /// system. 


Calling all of you Time-Conscious pro- 
fessionals: Before ONTIME™ the only 
way you could find out the time and date 
from within some programs is if you 
looked on your watch! 


ONTIME, the incredible new product from ON THREE Magazine, will conquer this 
problem by giving your Apple /// a great new feature: With the ONTIME clock driver 
installed you can display the Time & Date whenever YOU want 1t! 


A simple keystroke combination will turn the clock display on, another will turn it off. 
One more turns on a stopwatch that can count down by tenths of a second! This is 
extremely useful in monitoring how long you’ve been on the telephone, or using a 
computer service like the Source. 


The best part about ONTIME is that it operates in the ‘backround’ - continuously 
displaying the Time & Date while you are doing something else. Thus you can be 
working on your spreadsheet, typing a letter with your word processor or even printing 
out a financial report and ONTIME will continuously update the Time & Date 
information on the screen. 


Completely compatible with all Apple /// programs that run under SOS, ONTIME is 
sold exclusively through ON THREE Magazine for only $24.95. Please add $1.50 for 
shipping and handling, California residents must also add 6% sales tax. 


ONTIME requires an ON THREE O’Clock clock/ calendar or equivalent to work. | 


Special Deal! For a limited time you can purchase the ONTIME -ON THREE O’Clock | 
combination for only $59.90. That’s five dollars off! If you’ve been waiting for a reason 
to get a clock — ONTIME 1s itt! 
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See ads for: Micro-Sci disk drives, Gameport, Lazarus ///, ONTIME, CROSSWORD-SCRAMBLER 
and the Disks Of the Month throughout the magazine. 


Next Issue in ON THREE 
Reviews on: Word Juggler, Apple Speller ///, BPI... Family Finance. ..SOS Drivers & CP/M... 
ON The Phone... WPL — From ALL angles ... Business Basic Program Lister ... Pieces of 
Lazarus? ... and more! . 
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ON THREE Presents... 


Micro-Sci Disk Drives Mi i C RO- SC | 

Every once in a while a product appears that is so good ON THREE decides to offer it for sale to our 
readers. The Micro-Sci line of disk drives (and the Gameport ///) are the first of these superior type 
products. Byte for byte, these drives offer greater speed and more value than any comparable drive on 


the market today. If you are looking into purchasing an external disk drive for your ///, ON THREE 
encourages you to look into this fantastic product line. 


Expanding disk storage on the Apple /// can be an expensive proposition. 


But Micro-Sci has a better proposition for you, because our disk drives for the Apple /// give you 
greater capacity and performance for every dollar spent. 

And there are no compatibility problems. The A3 is a direct replacement for Disk /// drives, and the 
70-track A73 and 140-track A143 are supplied with a driver that is easily added to the SOS driver 
module, affording extra storage and fast seek rates for all of the programs that run under SOS. 

Talk about compatible! All three are the same size as your built-in drive and they use the same 
diskettes! | 

Are all of your slots full? Don’t worry, these drives plug right into the back of your /// and they don’t 
need a power cord! Up to three extra disk drives can be daisy-chained and they can be mixed in any 
combination of Disk ///, A3, A73 or A143. 

The A3 offers identical capacity to the Disk /// and is an excellent choice for a second disk 
compatibility in the Apple |[ emulation mode. 

At 286 KBytes, the A73 has double the capacity of the Disk /// while the A143 packs 572 KBytes of 
data onto a diskette. With over half a megabyte of storage space, the A143 makes a truly viable 
backup device for the Profile Hard Disk. 

With that large a capacity, many people find that they don’t need a hard disk! Since up to three 
A143’s can be used with your ///, you can have over one and three quarter megabytes of data on-line 
at all times! 


ON THREE is pleased to announce the following low, low prices on these great disk drives. 


A3 A773 
Suggested List Price: $379 $529 


ON THREE Price: - $299 $409 
Savings $80 $120 


To order, use the attached envelope and add $6.50 for postage and handling for each drive ordered. 
Please allow four weeks for delivery. 


~Gameport /// 

You don’t have to be chained to your job, and neither does your Apple ///. After the working day is 
done, release your computer into the exhilarating world of adventure and challenge with a Gameport 
TST from Micro-Sci. The new Gameport /// game controller adapter lets you use game paddles, 


joysticks and all your favorite Apple |[ amusement packages with your Apple /// computer. The 
Gameport /// is easy to use and simple to install - your only challenge is to conquer the invaders! 


The Gameport /// 


Allows all games written for the Apple ][ to be used on the Apple ///. 

Works with all Apple || game paddles and joysticks. 

Allows programs which require a game I/O protection key to run in Apple ][ emulation mode. 
Can be installed in any slot. 

Does not interfere with the normal operation of the Apple ///. 

Package includes: Gameport /// board, Apple ][ Emulation Modification Diskette and complete, 
easy-to-follow instructions (Apple ][ game controllers not included). 


ON THREE proudly sells the Gameport /// by Micro-Sci. For only $59.95 you can now get the best 
that the Apple /// and the Apple ][ has to offer. That’s $15 off the suggested list price so don’t be left 
out, place your order today! Please use the attached envelope for ordering and remember to add $2.50 ' 
for postage and handling. 


ON THREE 


Mh Mh 11/ 11/ Lh 111 111 


The €ditors Block: 


Bob Consorti 


Ss much news about the Apple /// and so little space to tell 

you in! The biggest announcement is the long awaited 
Apple /// plus. The big question is what's different? Not 
much, the only real reason for the /// plus is because the Apple 
/// never met FCC regulations (Ever try to watch TV in the same 
room with an Apple ///?). 


The /// plus sports an improved back panel design that helps 
reduce EMI (Electro-Magnetic Interference) by providing con- 
nectors that will hold interface cabling together and not fall 
apart at the slightest movement. Additional shielding through- 
out the chassis lets the /// plus meet the FCC regs. A clock is 
included in the /// plus, as this is a very handy feature. 

The major changes are cosmetic. There is a new keyboard 
design, and it’s very similar to the //e’s. Accountants don’t 
despair, they left on the numeric keypad! Oops, | almost forgot - 
the nameplate now reads “/// plus”. 

The last change is very interesting but it doesn’t quite meet up 
to the hype surrounding it. There is a new interlace mode that 
will double the vertical resolution of the graphics display from 
560 by 192 pixels, to 560 by 384 pixels. For you number buffs out 
there, that’s a greater resolution than the new Macintosh. 

The only problems with this are: 1) Apple has yet to supply a 
monitor that can display that resolution, and 2) There is no 
software available that uses the new mode. Problem #2 will 
be solved in time, as soon as Apple releases the necessary 
routines I’m sure that developers will write packages supporting 
the new graphics mode. Problem #1 is a very difficult one to 
salve. 

To display a screen of that resolution, an extremely slow 
phosphor monitor is needed. Without a slow speed phosphor, 
the image on the screen flickers very noticeably. Distracting 
enough to cause eyestrain, it clearly shows that the current 
Monitor /// isn’t any good for this graphics mode. Since my 
contacts tell me that Apple isn’t going to come out with one - 
they have destroyed any potential market for programs that use 
the new graphics mode. It’s like coming out with a 100 
megabyte drive for the /// but not making an interface card. 

So why did Apple give the /// plus a feature which has no 
use ? Well, it does have one use. It not only doubles the vertical 
resolution of the graphics screen, it “Interlaces” the image of the 
text screen. This makes for clearly readable text. If you were ever 
disappointed about the “Grainy” looking display of the ///, this 
new item will cure that. With interlace on, the text on the screen 
is of very high quality. 

All of the “features” the /// plus offers can be purchased for 
your present Apple /// at a reasonable cost. Your dealer can give 
you more information about this. Upgrading (new keyboard, 
interlace) isn’t really necessary as the machines are completely 
compatible. Everything that will run on a /// will run ona /// 
plus and vice-versa. 

What the /// plus doesn’t have is 512K of RAM, expanded 
floppy disks and a clear message from Apple that they are going 
to support the new machine. You are probably aware that Apple 
has come out with anew generation of personal computer - The 
Macintosh. Priced directly in the ///'s market (it’s actually less 
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expensive), they have 
a coordinated marketing 
Strategy for this product. 

They have already be- a 
gun a nationwide television advertisement campaign for the 
Mac and more is on the way! Millions of dollars have been 
earmarked for promoting the Mac in every possible way. The 
media hype for this computer has been tremendous. True, it is a 
very nice little machine, but so is the /// - and where is the 
support for it? 

It's been said that the Mac is the machine that will compete 
head to head with the IBM PC so | can understand why Apple is 
promoting it so much. On the other hand, people have been 
saying that if Apple supported the /// from the beginning - the 
IBM PC would have flopped. Why must Apple square off only the 
Mac against the PC? Doesn't it make more sense to nationally 
promote the //e and /// in addition to the Mac? Wouldn't it be 
better if Apple used a number of machines to fight off the PC? 

| have my opinions and I’m sure that you have yours. It seems 
that petty rivalries within Apple have caused the ///'s problems 
and | don’t see an end to it. Every paper and journal | read says 
the /// is a dud. Almost everyone | meet has never heard of the 
Apple /// yet they know that there is an Apple // and an IBM 
PC. It’s easy to call a product a dud when you know nothing 
about it. If the /// is ever promoted as the marvelous tool that it 
is, it will no doubt sell very well. 

I'm not really harping on the people in the Apple /// group 
inside Apple, they have to follow policies of the company and if 
no resources are allocated for the /// they can’t do much.:It’s 
almost funny! For the resources that they ARE given they have 
done a great job. The people in the Apple /// group are among 
the brightest in Apple - they have to be, to market a product that 
is getting little company support. 

| hope that these paragraphs above will stimulate some 
thinking on the Apple ///'s problems. It’s not my job to create 
controversy, the /// already has that. I’m simply trying to help 
the /// assume a respectable place in the marketplace. If you 
Nave any comments we will gladly publish them, so please - let's 
talk about the /// | 


The Real Good Stuff... 


Rumors for the /// include a mouse in the near future, a 512K 
upgrade before the end of the year, and a megabyte of static 
RAM (it doesn’t lose its contents when the computer is turned 
off) as an ultra fast disk drive. The mouse is a certainty and should 
be announced very soon. The memory expansion and RAM disk 
will probably have to wait for the new 256K memory chips. This 
may not occur until the end of the year. 

GREAT news for everyone with a 128K Apple ///. On January 
15 of this year, Apple cut the price on the 256K memory upgrade 
from $600 to only $300!! One of the major reasons they did this 
was to encourage everyone to upgrade to a 256K configuration. 
Since many programs for the /// need a 256K machine it really is 
a necessary option. Our Lazarus /// Version 2.0 and our 
new Draw ON /// both require a 256K machine, these new 

Editor's Block continued on page 11. 
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Ask THREE: 


(Letters to the Editor) 


Dear ON THREE, 


We are a Law Firm engaged in an area of practice whereby we 
fill out numerous United States Government forms. As you may 
guess, we use a wide variety of Government forms that, for 
example, may ask for a person's date of birth on each and 
everyone; but ask for the date to be placed ina different position 
on each of the various forms. Is there a data base or word 
processing software program available that will readily allow us 
to print from a single reference or data source for each client to 
any one or all of the various forms that may be required? Apple 
Writer ///'s word processing language seems to have come 
close; but we have not perfected it to where it is reliable as of yet. 
| guess | am looking for an easier way out. 

Thank you very much for your consideration, | have greatly 
enjoyed your magazine thus far. Keep up the good work. 


Sincerely, 


William H. Hoover 
Texas 


Dear Mr. Hoover: 


With regard to your question, there is an excellent new 
data base program called KEYSTROKE. The KEYSTROKE 
Data Base and the KEYSTROKE Report Generator combina- 
tion would probably handle the needs that you expressed. 

We are also going to publish a number of articles on just 
how to do that sort of thing using WPL. If you don’t want to 
spend a few hundred dollars, this is the inexpensive way 
out. 


Dear Mr. Consorti: 


Why does Apple Writer version 1.0 (and 2.0 - Ed.) only allow 12 
lines of input while the rest of the screen is blank? Why can't | 
have 22 or 24 lines of input? 

Another question is why do | get a volume not found error 
when | try to invoke “BGRAFINV”. | have the SOS.KERNAL. 
SOS.DRIVER, SOS.INTERP, and BGRAF.INV on my disk. | also 
have the following drivers, CONSOLE, AUDIO, .GRAFIX, and 
PRINTER. With my graphics program | have the first lines 10 and 
20 as follows: 

10 OPEN #1,"°GRAFIX” 
20 INVOKE’BGRAF.INV”’ 

Then when | run the program | get a volume not found error in 
20. 

Only when | change line 20 to read: 20 INVOKE *’.D1/BGRAF. 
INV." will my program run. What gives ? 


Sincerely yours, 


Dale Means 
Indiana 


VLA 


Dear Mr. Means: 


Apple Writer /// likes to keep the cursor centered in the 
middle of the screen, and that is why there are only twelve 
lines of input text available while the rest of the screen is 
blank. The program is written that way so there is no real 
way to change it except through letters like this. 

In reference to your question about the Basic program, 
when you try to invoke the BGRAF invokable module, your 
program gives you the “volume not found error’. This is due 
to the fact that you probably have the prefix set to .D2 or 
some other pathname in your system. 

When you change line 20 to tell it to look on .D1 for the 
invokable, it finds it. 

If you did not wish to put the .D1 in line 20, you will have 
to first set the prefix to be equal to .D1. For example, line 5 
would read: PREFIXS= “.D1”. Then, when it comes time for 
line 20 to run, the program would invoke BGRAF.INV from 
the disk in the currently selected prefix drive which is .D1. 


Gentlemen: 


Last year | purchased a Micro-Sci Al43 through you, and it 
works like a charm—first time, every time, in contrast to some of 
the hardware by other manufacturers | have encountered. | also 
have the clock you sell and am delighted with it. It is to be hoped 
that all your devices will be this reliable and economical to 
purchase. 

Your software reviews are also appreciated—both the formal 
articles and the readers’ comments in the letters column, so keep 
up the fine work! How about a review on the bewildering 
variety of printers now available, with special reference to price 
and utility for the ///? A number of manufacturers are now 
producing hard disk drives (e.g. Davong) adaptable to the /// at 
a fraction of Apple’s price. Any comments or experience on these 
will be most interesting. 


Sincerely, 


David H. Ballard 
Michigan 


Dear Mr. Ballard: 


A number of hardware reviews on printers and a special 
on hard disks will be coming up in the near future. We have 
our favorites and a couple of bombs that we will let 
everyone know about. : 

Thank you for your thoughtful comments and for your 
continued support of ON THREE. It is greatly appreciated. 


Dear Bob: 


What a fantastic magazine and service for Apple /// users you 
have! As a new subscriber, | have just finished reading the 


4 Volume 2 — Number 1 


ON THREE 


Mh VM VLA LL VLA VLA 41/ 


April/May issue and continue to be delighted with the overall 
quality of your (our!) magazine. | can’t help but echo the voices of 
the other Apple /// users who have written in expressing how 
refreshing it is to finally find a magazine that is dedicated to the 
///. Keep up the good work! 

| have had my system now for about four months and 
although | consider myself to be a novice, | do have a couple of 
things to pass On to you and your readers that may be of some 
interest. 

Did you know that the built in diagnostic tests can be initiated 
from the keyboard and run continuously? Here’s what you do: 
STEP 1: While holding down the CONTROL OPEN APPLE keys 

press and release the RESET key. 

The screen should now have ““—>_” appearing in the upper 
left corner of the screen with the underline blinking. 

STEP 2: Type FGE6G then RETURN. 

Your system should now be continuously executing the built 
in test and alternately displaying a series of test patterns on the 
screen. 

Unfortunately, | do not know what all these patterns mean 
except that if any character besides a dot appears in the matrix of 
dots entitled DIAGNOSTIC RAM, one or more of the RAM chips 
is bad. The location of the “non-dot” character also defines the 
location of the bad chip. 

Did you know that we can also program in Applesoft and 
Integer Basic? You are probably wondering why anyone might 
want to do this on the /// but my interest stems from the fact 
that my eleven year old daughter sometimes wants to try out 
Apple // programs that have appeared in a computer magazine 
that she gets and | didn’t want to have to translate them into 
Business Basic. Anyway here’s what you do: 

STEP 1: Boot the emulation diskette and select the desire 
language from the configuration menu. 

STEP 2: Press RETURN, and while the drive is whirring, press 
the RESET key. 

You should now have the appropriate prompt for the 
language you selected (e.g."]’’ for Applesoft Basic and “>” for 
Integer Basic). 

You are now in the programming mode and can enter Apple 
// Basic statements. At this point, however, | recommend that 
before you begin entering statements, you take a blank disk and 
format it in Apple // format so that any program that is 
developed can then be saved To do this simply insert a blank 
diskette into .D1 after STEP 2 and type INIT HELLO and then 
RETURN. The disk drive should whir as the disk is being 
formatted. After the disk drive stops, you should have a blank 
diskette that has been formatted in the Apple // format and 
onto which you can now save Apple // programs (and data). 
Also, after you have this disk with HELLO on it, further 
programming in Applesoft (or Integer) Basic can be accommo- 
dated without going thru STEP 2 above by simply inserting the 
disk after STEP 1 and pressing RETURN (i.e. by the normal Apple 
// program boot process). 

| have to add here, however, that although the above 
technique has worked for me there may be some hidden flaw/(s} 
in the above process as | am not familiar with the interworkings 
of the emulation mode. If you or one of your readers know of any 
or of a better approach to doing this | would like to hear about it. 

Now for a few questions. | have obtained a copy of SOS 1.3 
from my local dealer and have updated SOS.KERNEL and the 
drivers associated with my applications programs. However, is it 
also necessary to update any of the system related files such as 
SOS.INTERP ? 
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Do you know of any way to convert an SOS formatted diskette 
into an Apple // format and vice versa? What | would like to be 
able to do is to read a DIF file that | created in VISICALC /// 
(under SOS) with an Apple // VISIPLOT/VISITREND program, 
create some plots, save them as a binary file, and then make a 
hard copy using Business Basic. | Know that this sounds like 
along way around the barn but my printer (which is a GEMINI 
10) is not supported by VISIPLOT. Do you know of any way that | 
can accomplish this ? 

Do you plan to review Apple Business Graphics /// in the 
near future ? Because of the problems I’m having going back and 
forth between the native mode and the emulation mode that | 
just discussed, I’m considering purchasing this package. Any 
suggestions ? 

I'm also having problems getting my printer to respond 
properly to print control characters that | send it from Apple 
Writer ///, in particular when | try to switch between 132 
characters per line back to either 96 or 80. At the beginning of 
my file | type CONTROI V, the appropriate control characters 
(which for the GEMINI 10 is ESCAPE B 1 for 80 characters per 
line), another CONTROL V, and then RETURN. For some reason, 
however, this does not seem to work and the printer continues 
to print in the 132 characters per line mode. My printer is 
connected via a UPIC. Any ideas ? 

As this letter has become too long, | had better “put a lid” on 
it. Congratulations again on your fine magazine. | anxiously 
await your next issue. 


Sincerely, 


Ken Jutzi 
California 


Dear Mr. Jutzi: 


Thank you for your letter. You will not need to change 
SOS.INTERP, only SOS.KERNEL and the drivers. You can 
transfer files from your Apple /// disk to an Apple // 
format disk with an excellent utility called “SOSTRAN" from 
Sun Data Inc., 95 WA i100 South, Logan, Utah 84321, 
telephone number (801) 752-7631, for $60.00. 

The problems you are having regarding getting your 
printer to respond properly with certain control commands 
is not unique, and is, in fact, quite common. Apple Writer 
/// intercepts certain control characters before they are 
sent to the printer, and thus, they are not sent. There is no 
way around it with the normal printer driver that Apple 
supplies. However, Sun Data also has a package called 
“Printer Driver’ which gets around the problems and 
enables you to use the full features of your printer. 

Thank you again for your letter and for your support of 
ON THREE. 


Dear Mr. Consort: 


Enclosed is a check for a one year subscription to ON 
THREE. 

Finally a magazine devoted to the Apple ///! A few months 
ago, | would jump if | saw so much as a picture of anApple /// in 
the computer magazines | subscribed to. A few articles on the 
Apple /// were out of the question back then, or so it obviously 
seemed to the publishers of computer magazines. But a 
Magazine on the Apple ///?! Such a thing would only be in a 


Volume 2 — Number 1 | 5 


ON THREE 


Shh 444 Sth S14 Mh 14 414 


dream after eating a pizza. | 

Is it too late to purchase a Micro-Sci disk drive at a reduced 
price from you? 

What is meant by fixed-media regarding the ProFile? Does it 
mean that files cannot be copied to a disk? Also, what are 
“interrupts” ? 

| read a letter in the April-May issue of your magazine by Mr. 
John Lomartire. He said that the PRINTER driver did not work 
with NEC 7720. He said that the .RS232 driver had to be used to 
correct this. Why? This is how | set mine: 08 26 00 00 00 80 13 11 
DF DF 80, and it works perfectly. | have changed the name of the 
driver to .NEC to avoid confusing it with other printers. | hope 
this will help Mr. Lomartire. 

Though this would not be of much help, it might interest you. 
Typing PR#7 (I think it is the “7”, but my emulation disk isn't 
working.) will cause the printer to type every letter you type in! 

Is there any way of making the NEC 7720 capable of 
proportional spacing ? 

Could you publish a series of articles on assembly language ? | 
noticed that you have articles on Basic and Pascal; | am 
somewhat “fluent” in these languages, therefore, | would like to 
learn assembly language. Also, | would like to know how 
“Assembling on the /// ‘works, especially the one in the April- 
May issue. 

| have a book on assembly language that assumes everything, 
and has taught me nothing. Do you know of any books on 
assembly language that can be understood? 


Yours truly, 


Frank Hammers 
Louisiana 


Dear Mr. Hammers: 


| enjoyed your letter very much, thank you for your 
enthusiastic comments. | - 

We are still selling Micro-Sci drives at the reduced price, 
and you can order them either by telephoning directly with 
a Visa or MasterCard or by sending a regular order in. 

With regard to your other question, “fixed-media” means 
that the disk cannot be removed from the drive as floppy 
disks can be taken out of the disk drive and then you can 
put a different floppy disk in. Files can be copied from the 
Profile or any other hard disk. There is complete compati- 
bility within the varying disk drives. 

An “interrupt” is something that stops the currently 
operating process of the computer so that it can do 
something else. For example, when you press a key on the 
Apple ///, the currently operating program is halted 
(temporarily), and the control of the computer is passed to 
something called the “interrupt handler” within the con- 
sole driver. This then puts the value of the key press into the 
type-ahead buffer. When done, it returns control to the 
previously operating program. This happens so quickly that 
the user never knows that his program was stopped 
momentarily. Then, whenever the program asks the con- 
sole driver for a character, instead of stopping the entire 
system and waiting for the person to press a key, the 
character comes from the typeahead buffer. Thus, the 
computer doesn't have to stop all the time to do things. You 
can type a whole line of commands at once and go have a 
cup of coffee while the computer works on those com- 


Wi! tl tM Wl WU Wl WM 


mands that you typed in. 

Another example of “interrupts” is whenever you print 
something to your printer. Since your Apple /// can send 
information faster than the printer can print it, it would be 
a waste of time to tie-up the entire Apple /// while the 
computer was printing. 

When printing a large document, the Apple /// solves 
the problem by not sending the document straight to the 
printer, but, first, to a buffer inside the computer. When the 
printer is ready to accept another line of information from 
the document, it interrupts the computer. Now control is 
passed into the interrupt handler of the printer driver. This 
routine gets a line from the buffer and sends it to the 
printer. It then returns control to the previously operating 
program, which could have been, say, VisiCalc. Thus, you 
could have sent your spreadsheet to be printed, and it 
would then go into the buffer; and while you were doing 
something else, it would print out. This is called “con- 
currency”, and is the only implementation on a micro- 
computer that I know of. The printer runs in the background 
while the computer can do something else in the meantime. 

Thanks for the notes on the printer driver problems. We 
aren't familiar with the NEC7720, but we will ask around 
for you. A series on Assembly Language is coming up. This 
should help you in your quest for knowledge in Assembly 
language. ye | 

Additionally, Rodney Zak's book, “Programming the 
6502” by Sybex Publishing is a good book to start off with 
for learning Assembly language programming. 

Thank you again for your letter and for your support of 
ON THREE. | 


Dear Bob: 


| just received Issue #4 and am impelled to share some of my 
experiences with ProFile. | was struck by the glaring difference 
between your reader’s horror stories and the “press” given it 
through Apple dealers. It sounds as if there have been sub- 
stantial problems with ProFile, and that its reliability has been 
overstated. On the other hand, the solution to these problems 
may be quite simple. 

| have had three or four major ProFile head crashes and lost 
some non-essential data as a consequence of my own failure to 


keep absolutely current back-ups. | grew to have a familiar 


unpleasant sinking feeling in the pit of my stomach every time 
“damaged directory” appeared, which it did all too often. 

My local dealer was supportive throughout, and never failed 
to come through. Apple relayed, through my dealer's repairman, 
that | had the worst ProFile, in the whole world! On crash #2, 
my Apple salesperson, since bumped “upstairs”, gave me his 
own ProFile, which contained a number of goodies, including 
his own tax return! Being a gentleman | purged it without 
further examination. 

Finally, Apple replaced the entire unit. At the the same time | 
bought a surge suppressor. Six months later, | have had no 
further problems. We have had floods, earthquakes and elec- 
trical storms. | have no idea whether it was the new hard disk or 
the surge suppressor that solved the problem. On the positive 
side, | can recommend a hard disk crash as a good way to get 
“nousecleaning” tasks done since it reminds one to discard 
unwanted files. 

A few suggestions for further applications of Apple /// in your 
operations... Why not set up an ON THREE bulletin board? | 
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doubt that it would detract from the Correspondence section; 
doing otherwise ignores the communications capabilities of the 
Apple ///. Interesting exchanges could be saved and printed in 
ON THREE. Do you use the typesetting capabilities of the ///. 

Apple Speller /// should be given a crack at the proofs of the 
magazine before they are ‘put to bed”. Quite a few typo- 
graphical errors have managed to slip through in the last issue. 

Finally, you might consider an article on Catalyst structure and 
problems. It has been a delight to use, but | have had to do some 
barely-satisfactory patching and still have lingering problems 
with my parallel driver for the NEC 8023 which neither my 
dealer nor Quark has been able to solve. 

ON THREE is already a tremendous success and it’s getting 
better. Apple /// users like myself are reassured by the 
grassroots support that is represents. It is exciting to see the 
creativity that can be brought to bear on problems which have 
vexed all of us, and even more exciting to see problems defined 
for applications which | haven't even thought of! My warmest 
wishes for your continuing success! 


Sincerely, 


Dana E. Wilson, M.D. 
Utah 


Dear Mr. Wilson: 


Thank you for your thoughts on the ProFile hard disk. As 
you probably know by now, we had similar problems that 
were also corrected with the addition of a surge suppressor. 
It seems a very valuable addition to any office with sensitive 
electronic equipment. 

The ON THREE bulletin board will be set up next month 
and announced in the next issue. | also think some fairly 
interesting exchanges will occur on the system, and they 
will be included in future issues of ON THREE. 

Our typesetting capabilities are such that once we get an 
article to be typeset, we add the typesetting commands, 
such as enhanced italics, and we then use a modem to 
transmit it directly to the typesetting machine. 

Sorry about the last issue. | know a lot of typos did creep 
in. We didn’t use our automated typesetting capabilities in 
the last issue as we wanted to test out a local typesetter and 
see a comparison - quality and such. He didn’t measure up 
to our standards and we will not be using his service again. 

We have an upcoming article on the use of Catalyst and 
overcoming some of its problems. Thank you again for your 
support of ON THREE. 


‘Letter to: 
Software Publishing Corp. 


| enjoyed the latest issue of PFS: NEWS, particularly the 
information on PFS: WRITE and PFS: Solutions; but was dissa- 
pointed that you are not advertising these as being available for 
the Apple ///. | have found PFS and PFS: REPORT to be very 
valuable additions to my Apple /// software library and of all the 
software | have, the PFS: Series is the easiest and quickest to use. 

After hearing that PFS: WRITE was to be released, | told my 
Apple dealer that it will be one of the best word processors 
around and that he definitely should stock it. This, of course, was 
based only on my experience with the other PFS: Software. 

Please do not stop providing software for the Apple ///. | 
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know you have to market where the “numbers’ are, but don’t 
forget where the “quality” is, the Apple ///. 


Sincerely, 


Howard L. Olien 
Minnesota 


P.S. | couldn’t help but notice the Apple /// in the picture on 
page 4 of PFS: NEWS - “SPC: Quality People Making Quality 
Products.”. 


Dear Mr. Olien: 

Thank you for the copy POF your letter to Software 
Publishing Corporation regarding the een series. I'm sure 
our other readers will like it. 


Dear Mr. Consort: 


Most Apple /// owners are aware that their machines have 
not received widespread acceptance. This sad: fact Is being 
helped.along by recent publications. 

As you probably know, CONSUMER REPORTS recently 
published a fairly lengthy review of the most prominent currently 
available microcomputers, completely omitting the Apple ///. 
Such reviews could play a major part in the future on the ///; the 
reviewers’ perception of the importance of a particular machine 
might be influenced by a sufficient public response. | have 
written.a letter to the magazine (copy below) pointing out this 
omission; other readers of your magazine may wish to follow 
Suit. 

The first few issues of your publication have contained a 
number of items of interest to me and | am sure it will be a 
valuable resource to all Apple /// users. Keep up the good work! 


Sincerely, 


David L. Yerzley, M.D. 
California 


Letter to CONSUMER REPORTS: 
Dear Editors: 


| have read the section on personal computers in the 
September 1983 issue of Consumer Reports and found it 
thoughtful and well researched, in keeping with the standards 
which have resulted in my habitual consulting of your opinions 
before making most significant purchases. 

One computer absent from your discussion which is, | think 
worth including is the Apple ///. Although it has not achieved 
the market acceptance of the IBM PC, of which it is a direct 
competitor, it has a number of strengths: 

1) An extensive library of software which will run on the Apple 
J/// is available. 

In addition to its native operating system, SOS, an Apple // 
emulation.program is supplied with the computer, allowing it to 
run most software written for the Apple //, //+ or //e using 
DOS 3.3 An optional circuit card allows the use of CP/M-based 
programs as well and includes Microsoft BASIC. 

2) The uniquely elegant operating system of the Apple /// 
eliminates the need to keep track of the machine’s physical 
configuration when manipulating files and performing other 
routine operations. 
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As the system is entirely RAM based, any existing machine can 
be updated to the most recent version simply by changing the 
system files on boot discs. (An update which became available 
after | had bought my machine was supplied free in the form of a 
program which automatically revised all boot discs. 

3) The Apple ///, with 256K RAM, costs little more than an 
Apple //e with a few extra circuit cards and two disc drives but is 
considerably more powerful. It is significantly less expensive than 
the IBM PC yet its capabilities compare favorably with those of 
the PC. 

The IBM PC and Apple /// use different microprocessors; the 
16 bit Intel 8088 used in the PC is touted by IBM as an “advanced 
feature” for personal computers. Most benchmark routines, 
however, require essentially the same time to run on either 
machine, and the 8088 handles input and output in 8 bit 
increments, as do the PC’s peripheral devices. Although at 
present only a 256K memory is offered by the manufacturer, the 
Apple ///'s architecture is capable of addressing up to 512K of 
RAM. Some features such as color capability, optional in the PC, 
and an RS-232-C serial interface, allowing direct connection 
with a modem, are standard in the Apple ///. 

4) Versions of BASIC and Pascal written specifically for the 
Apple /// are sufficiently versatile to support custom program- 
ming of the machine for almost any imaginable business, 
scientific or engineering application. 

5) Apple Computer has a well deserved reputation for the 
excellence of its customer service. | 
_ [| experienced some hardware problems with my machine 
initially which were intermittent in nature and impossible to 
demonstrate to my dealer. Based entirely on my description of 
the problem, the dealer and Apple’s area representatives 
cooperated in replacing a major portion of my system to 
eliminate the fault. In my prior years of experience as an 
aerospace engineer | found such acceptance of responsibility by 
an equipment supplier to be all too rare. (In my case several 
major rebuilds of the machine were required). 


| suggest that such considerations make the Apple /// an — 


attractive choice for those who seek a powerful and versatile 
personal computer. 


Sincerely, 


David L. Yerzley, M.D. 
Dear Dr. Yerzley: 


Thank you for your letter regarding the CONSUMER 
REPORT's review of the currently available microcomputers. 
It is quite interesting and definitely thought provoking. 

We thank you for your candor and support of ON 
THREE. 


Dear Mr. Consorti: 


First | would like to express my appreciation for ON THREE. 
You have done a fantastic job for a start up special interest 
magazine. Each issue is eagerly awaited. Thank you. 

Assistance with three questions please! My son is studying 
Fortran in college. Is there a way to run Fortran on our ///so he 
can use it in his studies? Secondly, is it possible to change the 
///'s keyboard from Sholes (QWERTY) to DVORAK? Last, would 
you consider a classified section for ON THREE so subscribers 
could offer for sale items peculiar to the ///? It would be of great 
value for many users. 
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Keep up the good work. 


Sincerely, 


Richard A. Coomes 
Kentucky 


Dear Mr. Coomes: 


Thank you for your letter. Regarding the Fortran prob- 
lem, |have been assured by various personnel at Apple that 
a Fortran package for the Apple /// will be forthcoming. 
The exact date | am not sure of yet. But, we will publish 
notice of it as soon as we hear. 

Yes, it is possible to change the Apple ///'s keyboard 
from Sholes to Dvorak. All you need to do is use the System 
Configuration Program and go into the Change System 
Parameters Menu and load in the keyboard layout file that 
is on the Utilities.Data disk called /UTILITIES/KEYBOARD. 
LAYOUT/DVORAK. 

Lastly, you will need to gently pull each key cap off of the 
keyboard that is different and replace it in its proper 
Dvorak position. 

| believe that Apple has a Dvorak keyboard available, 
but | am not sure of this. | 

We have considered a classified section in ON THREE, 
and it will more than likely be in future issue. 

Thank you again for your support. | look forward to 
hearing from you in the future. 


Dear Mr. Nichols: 


Of all the articles in ON THREE, | enjoy yours the most. Each 
utility is VERY well documented and the Documentation and 
Test programs that are provided are really good. | especially 
enjoy the way each utility is demonstrated in both Basic and 
Pascal...this in itself provides me with a great working tutorial of 
the similarities and differences between the two languages. 

You asked in the June-July issue what features | would like to 
see in the column. | for one would like to see the column 
expanded to include tutorials for assembly programming of the 
///. There are many good books now on the market for 
assembly programming of the 6502 microprocessor that is in the 
Apple //, the tutorial could take off where these books end and 
describe the enhanced indirect addressing capabilities of the 
///. \ realize that much of this information is in the SOS 
Reference Manual but as you are aware the Manual is far from a 
tutorial. 

A utility that | would like to see would be a File Type 
Converter. In other words | would like to be able to change file 
types, from say a data file to a font file. Is this possible outside of 
the Pascal environment? Also on Disk Of the Month #1 there is a 
whole set of Character Fonts. | would like to be able to use these 
in Apple Writer /// (using the change character font command), 
but Apple Writer requires these files to be pascal data files. The 
PKASO card with an Epson allows me to print using any system 
font so it would really be nice if | could use those additional fonts. 
Also any idea how Catalyst works??? If it can run as a master 
interp controller lurking behind each of the programs on its 
menu, is there any reason why an automatic Apple /// can’t be 
set up. Such a master program would not only control the interps 
and loading of programs on the menu, but would tie the 
sequence and control of each program to the system clock so 
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that a number of programs could be in sequence on an 
unattended Apple ///. Curious little thing, aren’t I? 
Thanks again for a super column. 


Sincerely, 


Eric M. Moeller 
Montana 


Dear Mr. Moeller: 


I'm glad you enjoy the utility programs. They do take 
quite awhile to put together, but they are very useful and 
informative. 

In a future issue of the magazine we will begin an 
assembly language column on the /// that deals with 
specific hardware aspects of the /// and how to use them. 

| also agree that the SOS Reference Manual is far from a 
tutorial. We will try to correct this in future columns. 

Foxware Systems, one of our first advertisers, has a 
program that can change file types for you. However, the 
character fonts that were on the Disk Of The Month #1 can 
be used by Apple Writer ///. You are incorrect in your 
assumption that Apple Writer requires these files to be 
Pascal data files. They do not need to be Pascal data files. 
However, they do need to have the suffix be a “.CHR’. If 
you'd like to use these fonts with Apple Writer, change the 
names, for example, from BYTE to BYTE.CHR. Then, you 
should be able to load them directly into Apple Writer. 

THe PKASO card can be used with the fonts that were 
supplied on that diskette to show off the various fonts that 
the Apple /// can use. Thanks again for your comments. | 
look forward to helping you and everyone else out there in 
the future. 


Dear Sirs: 


Enclosed is a subscription order for twelve issues of ON 
THREE. 

The magazine viewpoint is interesting to me. A used Apple 
/// was my first introduction to microcomputers and computing. 
With all the frustrations of a beginner beginning, | learned the 
rudiments of Apple Writer /// and a little about the offerings in 
the early business package. | did not learn much about the 
machine, just enough to do a limited list of things. Word 
processing was the immediate value that | recognized. 

| Mave since purchased an Osborne and, most recently, a 
Franklin Ace 1000. Of those, in spite of a love-hate relationship 
with the ///, it is still the best, in my opinion. | talk to 
Salespersons in the Duluth area who grew up with CP/M, and 
they do not like SOS. | had nothing else to compare with, when 
first | struggled with SOS, and | find that CP/M seems primitive. 

| speak only as a duffer. | read the letters to the editor from 
persons who know what's going on in the machine, and it awes 
me. 

The applications which are being made of this Apple /// are 
word processing, an accounting system, GL-Plus, Business Basic 
which has been used to write a number of office management 
and engineering programs, and Pascal, which has been used to 
write one or two other engineering programs. 

The lack of popularity of the /// has been most frustrating. We 
have learned, as we were told by many, that one cannot afford 
to write software. We had to try it; the sages are right. But the 
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engineering community has not supported the ///, so that very 
little software that could be useful to us is available for the ///. 

An employee of our company has taken a particular interest in 
programming for the machine. He wrote to Apple and learned, 
so | understand, that he has to pay, annually, for a license to 
write programs for the ///. | am told that IBM made al! kinds of 
data available to writers for the PC. The Apple Company’s stance 
is most strange. Our company will probably end up with an IBM. 
I like the ///, but believe that many of its problems are traceable 
to restrictive attitudes by its manufacturer. 


Sincerely yours, 


David C. Rutford, PE. 
Minnesota 


Dear Mr. Rutford: 


Thank you for your comments concerning the state of the 
Apple ///. All of us at ON THREE tend to agree with you 
that Apple has been more than somewhat restrictive in its 
release of information pertaining to the ///. Hopefully, 
this will be cleared up in the near future, as the /// is a 
fabulous machine that is quite underrated. 

Thank you again for your comments. Hopefully, we can 
all encourage Apple to make those types of changes. 


Dear Bob: 


| just picked up a copy of Apple’s new booklet “Will 
Someone Piease Tell Me What an Apple /// Can Do?” 
It is a guide to more than 300 application Apple /// software 
products available. A neat book for Apple /// users. My local 
Apple dealer gave it to me free. 

Also, my dealer updated all by boot disks to SOS version 1.3. 
also free. Until | read your publication | didn’t know there was a 
new version of SOS. 

Additionally, Apple is offering an update program for Apple 
Writer /// version 2.0 They want you to send your master disk 
and manual and $100 check payable to: Apple Writer Upgrade, 
PO Box 306, Half Moon Bay, CA 94019. They promise delivery of 
the new version within 4-6 weeks. 

The articles in ON THREE requiring use of Business Basic 
caused me to buy it and use it. Boy, | didn’t realize all the 
beautiful graphics that could be displayed on the /// until | ran 
the Three Shorts - Fini! Out of sight! 

| am the Assistant District Attorney for Butte County, Calli- 
fornia, and use the Apple /// very heavily. Presently | rely on 
Apple Writer ///, Quick File ///. Apple Speller /// and VisiCalc 
Advanced Version. The hardware consists of the Apple ///, 
Monitor /// external Apple disk drive, and an Apple DMP. | 
purchased the system last August out of my own pocket as a 
working tool | intend to claim every cent | spend for business 
purposes from next year’s income taxes to be sure! 

Like many of your readers | too ama complete neophyte in the 
strange world of computers. Trying to figure out how to achieve 
use of the full horsepower of the Apple /// has been difficult. 
The reference manuals are often terse and assume one has some 
computer ability. | searched the magazines for “tutorials” on the 
/// with minimum success. My dealer happened to mention 
your magazine, loaned me the premiere issue, which prompted 
my subscription. 

Recently | received a flyer from Apple about some new 
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products from Apple for the ///. | thought | would share what 
they sent with your readers in the event some of them did not 
receive the same brochure. Listed they are: 

—Apple Serial Card /// to add an additional serial port to 
drive “nearly any standard serial device, such as modems, 
printers, plotters, etc.”; 

—Apple Writer /// (Version 2.0), and enhancement offering 
“more simplicity and new capabilities, including direct interface 
to Apple Speller ///"; 

—Apple BPI /// Business Accounting “...that takes advantage 
of the ProFile hard disk...includes General Accounting, Accounts 
Receivable, Accounts Payable, and Payroll.”; 

—Catalyst, Version 2.0, from Quark, “to put any Apple /// 
program on the ProFile hard disk and switch from one program 
to another by simply selecting the program from a simple menu.” 

What's more, Apple announced the formation of “an inde- 
pendent business unit dedicated solely to the task of supporting 


the Apple /// product line.” 
Again, thanks for a very good magazine. As a former resident 


and prosecutor in Ventura County (3 years ago) | was surprised 
to find my source of answers coming from familiar turf. 
Looking forward to the next issue. 


Sincerely, 


Jack D. Wood 
California 


Dear Mr. Wood: 


Thank you for the information on the new software 
listing for the ///. I'm sure all of our other readers would 
like to hear about it. 

All of our Disks Of the Month after Disk Of the Month No. 
1 included the Basic system on it. This means that you don't 
have to buy the Basic language system for the /// to run the 
graphics program in the magazine. Simply buy the DOM! 

Thank you again for your support. 


Dear ON THREE, 


How can | find out more about “Patching Apple /// Pascal” by 
Dr. J. Jeppson? | would appreciate an address or any other help 
you Can Pass on. 


Thank you, 


Ron Joyce 
Minnesoto 


Dear Mr. Joyce: 


With regard to your question about “Patching Apple /// 
Pascal” by Dr. J. Jeppson, that was an article published in 
SOFTALK magazine in the February 1983 issue, page 190 
through 198. You should be able to find a back issue at a 
local dealer. 

Additionally, this is only valid for Apple /// Pascal 
version 1.0. Versions 1.1 and version 2.0 (2.0 is not currently 
available to end users) both have provisions for doing the 
same type of thing that Dr. Jeppson outlined in his article, 
and it is included with the Pascal system as a program called 
“PMOVE”. 
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Dear Mr. Consorti: 


Is there a Logo software program available for Apple ///? 
Sincerely, 


\/ Warren 
Kentucky 


Dear Mr. Warren: 


To the best of our knowledge, there is not a logo 
software program available for the Apple /// as yet. 
However, as soon as we hear of one we will pass on the 
pertinent information. 


Dear Mr. Consorti, 


As arecent subscriber to ON THREE, | was delighted with 
the amount of information you shared with your readers. At last 
there is a source where Apple /// users can go to when in need. 

| have a few questions concerning the Apple ///. 

1. Can the ON THREE O'Clock be used in Apple // 
emulation mode? If so, how would this be done? 

2. Do you know of any packages that enable graphics dumps 
to printers? | have an NEC PC8023 Dot Matrix printer running 
through the UPIC card. 

3. Can you recommend any average priced modems that 
could be used on the ///? | don’t know much about modems 
and would appreciate an evaluations on some currently avail- 
able modems. 

Thank you for your time, and | look forward to receiving the 
next issue of ON THREE. Your’re doing a great job there, so 
keep up the good work! 


Sincerely, 


Ali Arjomand 
California 


Dear Mr. Arjomand: 


Thank you for your letter your enthusiastic comments 
about ON THREE. They were very much appreciated. 

Concerning your questions about the ON THREE O'Clock, 
it cannot be used in emulation mode due to the restrictions 
that emulation mode places on the C000 I/O expansion 
space. 

To the best of my knowledge, there are no packages that 
will enable graphics dumps on your NEC PC8023 running 
through the UPIC card. | would recommend dumping the 
UPIC and getting a PKASO which has full text and graphics 
dump capabilities built in. We recommend the Smart- 
Modem by HAYES as the best modem on the market. There 
are cheaper ones on the market, and those companies are 
not going to be around. HAYES has been around. They're a 
proven leader in the field. 

Thank you again for your letter. And thanks for your 
support of ON THREE. 


Dear Bob: 


| read with interest Mr. Nichols’ article in the June/July issue 
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on formatting disks from Basic and Pascal. | cannot seem to get 
the appropriate files onto my Business Basic Diskette. | have the 
DOM and have transferred FORMAT.TEXT from side two. 
However, since FORMAT.TEXT is type PASTXT | can’t do 
anything from Basic (type mismatch error). What have | done 
wrong? 


Sincerely, 


James P. Santelli 
Minnesota 


Dear Mr. Santelli: 


The files you will need to format disks from within Basic 
are FORMAT.INV BASIC.FOR.D.T. Once you have trans- 
ferred those two files to your Basic disk, boot your Basic 
disk and type “RUN BASIC.FOR.D.T”. 

If there are any further questions, please don't hesitate in 
writing us. 


Mr. Bob Consorti 


| recently received my back issue of the January Volume 1 
Number 1 of ON THREE. 

Thank you very much. It is an excellent magazine and 
something that Apple /// owners’ have been desperately 
hoping to have available in previous years. Finally, some one like 
you, Mr. Consorti had the vision to publish the ON THREE. 

| have been wanting to use my Apple /// to do some Fortran 
programming. Is there anyone that offers software that is 
compatible with the Apple /// computer? 

If you can provide me with some names or leads | can follow 


up. 
Thank you, 


Eugene Spiewak 
Michigan 


Dear Mr. Spiewak: 


Thank you for your enthusiastic comments about ON 
THREE. They were very much appreciated. 

Appropriate people at Apple tell me that a Fortran 
package for the /// will be released shortly. This will be in 
native mode. However, if you can't wait for that, you can 
get the CP/M card for the /// and buy one of the CP/M 
Fortran packages. 

! would wait, however, until the Apple version of Fortran 
came out. 

Thank you for your continued support on ON THREE. If 
you have any further questions, please don't hesitate to 
write us. 


Editor’s Block: continued... 


products coupled with the price decrease should make everyone 
who has a 128K Apple /// finally upgrade their machines. 

ON THREE is very proud to announce Draw ON /// . 
Described in detail on the back cover of this issue, Draw ON 
brings the power of LisaDraw and MacPaint to the Apple 
///. Powerful cut and paste facilities let you create almost 
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anything that you can visualize. Very fast, Draw ON lets you 
“pick-up” objects on the screen and “Drag” them around in 
real-time. This is the most exciting package ever for the ///. 
With Draw ON you can become a one person graphic arts 
Studio! 

Since it works in any of the Apple ///'s color or B/W graphic 
modes and can quickly print out any picture that you create, 
Draw ON is the first program to fully take advantage of the 
Apple ///'s tremendous graphic capabilities. Even after using it 
for some time | can’t believe some of the pictures that I've drawn! 
Complex three dimensional figures are easy to create as you can 
Place objects in front of or behind previously drawn objects. 
CAD is also possible with the powerful “rubber-banding” and 
grids available. 

Ever been bored with some of the graphs that your business 
charting programs create ? Would you like to add different titles ? 
Change the “Look” of the graph? Use different colors or texture 
black and white graphs? It’s alla snap with Draw ON ///! Built 
in help screens help you master this powerful program and there 
is a top-quality instruction manual that rivals the beautiful books 
that Apple itself makes. 

Over the past few months we have done demos of Draw ON 
at various trade shows and the response is almost universal - 
How can you do that on an Apple ///? - It wasn’t easy, but 
Draw ON will truly expand your use and need of the Apple ///. 
Priced at only $129, this is one of the few programs that you can’t 
do without. 


Over the past few months we have developed ONTIME, the 
Apple /// Time-Management System. If you have an ON 
THREE O'Clock or equivalent Clock/Calendar for your ///, 
you Can enjoy the benefits of ONTIME. ONTIME is a software 
driver that permits you - the user to display at any time and from 
within any program, the time and date. 

A simple keystroke turns on the clock display in the upper 
right hand corner of the screen. In the exact same format as the 
SYSTEM UTILITIES disk, BACKUP ///, and Lazarus /// 
Version 2, the time and date tick off in the “Background”. Thus 
you can be editing a word processor file, updating some figures 
in a spreadsheet, or even using your Data Base Management 
System and the time and date will tick off second by second. 

Compatible with all Apple /// programs running under 
SOS, ONTIME gives the user freedom - freedom from having to 
look at the clock or watch to check what time it is. With 
ONTIME, just look on your screen! Since you can be doing 
something else while the clock is ticking off, ONTIME works 
with you, not against you. After using it you'll wonder just how 
you got along without it. 

Ever try to keep a long-distance call down to a certain number 
of minutes by looking at your watch and guessing when it’s time 
to say goodbye and hang-up? With ONTIME, as soon as your 
call goes through simply turn on the Stop-Watch feature. The 
elapsed seconds will be displayed on the screen giving you an up 
to the second read-out of how long you've been on the phone. 
This timer can count up to 99 hours, 59 minutes and 59 seconds 
-long enough for monitoring the longest phone call imaginable. 

For those of you who take your Apple /// everywhere, the 
Stop-Watch can even count by tenths of a second - perfect for 
timing your favorite horse as he races! Fantastically priced at only 
$24.95, this is one of the few items that will make the Apple 
/// even easier for you to use. If you don’t already have a clock, 
please check the special pricing on an ON THREE O'Clock - 


ONTIME combination listed elsewhere in this issue. 
Editor's Block continued on page 17. 


Volume 2 — Number 1 | 11 


ON THREE 


111 TI hh S11 11 S11 Tt 


Why Is €veryone 


So Excited About Lazarus? 


fter letter after letter saying such things as: “It’s the first 
program that | feel like an expert at after just five minutes.” 
“Lazarus not only works very well, it is the best looking 
program | have ever seen.”, and “It makes my Apple /// look 
and act like a Lisa!”’, | think it’s time to explain just why everyone 
is so excited about Lazarus. 


Lazarus /// V2.0 Unveiled 


Since a picture is worth a thousand words, there are quite a 
few pictures here of just what Lazarus looks like. Well, they 
aren't actually pictures, they are screen dumps using the 
PKASO interface card. Since they aren't exact pictures the 
aspect ratio may be a bit off. In any case, when you boot the 
Lazarus Start-up Disk, the Lazarus Main Menu comes up in 
a minute or so. It is shown in Figure #1. 


[FIGURE #1] 
LAZAR'S 447 '\2 6 22 Jan $4 5:39:66 PH 
8 1982, 19833 QAI Prefix is .DI 
Rain Henu 
| Welcome to #éf = The easy to use file restoration 


LAZARUS 
utility from the folks who bring you QGW7AREE Magazine. 
& Undelete Files 
List Files 


> Quit The Progras 


= f Set The Frefix 
QV 7AME Information 


4 t to move. 
{cere ? > de?” - ie for HELP. 


Have yOu ever used a menu driven program, gotten lost in one 
of the menus, and could not find a way out? With programs as 
complex as the System Utilities and KeyStroke, it’s not hard 
to get caught in one of those blind alleys and struggle for a way 
to break free. Actually, System Utilities is a complex but fairly 
easy program to operate. If you ever get lost in that program just 
press the ESCAPE key. This will bring you to the next higher 
menu. 

The command to go down into a menu is usually RETURN. 
While a good approach, a novice (and even experienced users] 
can easily lose themselves in one of these menus and search in 
vain for a way out. The problem is of people either forgetting or 
losing track of where they are in the program. This is because the 
program is forcing the user to remember where he came from in 
the menu system. 

Lazarus overcomes these difficulties by using a different type 
of menu. The Lazarus menu is set up as a number of electronic 
file cards. The TAB at the top of the first card tells you it is the 
Main Menu. Likewise, each other file card will identify itself in 
the TAB portion of the card. The contents of each file card 
(sometimes called - Menu Items -) are displayed on that file 
card. 

On the file card, these Menu Items are normally preceded by a 
miniature file card. These indicate pathways into different parts 
of the program. Just as most menu driven programs allow you to 
select their menu items with the arrow keys, Lazarus will 


to select, 


Press: (EScare) for prior menu, 
You may aiso type the name of your selection. 
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respond to the arrow keys AND by typing the letter(s) of each 
menu item. 

In most menu driven programs, the idea of where you are in 
the menu is generally the same. Something called the High- 
light Bar will overlay amenu item. In Figure # 1 the highlight 
bar is overlaying the Program Information menu item. 

Under most menu driven programs, if you pressed the 
RETURN key here, the Programs Information menu item 
would take over the entire screen and you could be quickly 
confused over just what happened to the Main Menu. With 
Lazarus there is no confusion! When you press the RETURN 
key, the Program Information menu item “Pops-Up” and 
“Floats” (you have to see it to believe it!) to a position 
overlaying part of the Main Menu. Shown in Figure #2, note 
that it doesn’t take over the entire screen, just the part below the 
menu that it exists on. 


[FIGURE #2] 

LAZAMUS FFF 28 2 Jan $4 5:51:92 PH 
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Proarar Information 


Use this menu to select information on the various features of 
LAZARUS #74. This program ts completely selfedocumenting, so 
1# you have a problem, the information screens wil] help you. 


Ct Menu Iters 


& File Selection 


Ne 


& The HELP Screens 


| | 


Press: for prior menu, to select, ¢44t to move. 
You may also type the name of your selection.  (Gaapm?7, d=? or é=7 for HELP. 


The TAB portion of the Main Menu is still displayed, so that 
even after going down into a menu item, there is no ambiguity 
over where you are and how you got there. Just as in most other 
menu driven programs, pressing ESCAPE will bring you back to 
the next highest menu. If you press ESCAPE here you will get 
back to the Main Menu shown in Figure #1. 

Now that you're at the Main Menu, press RETURN to “Pop- 
Up” the “Program Information” menu item. Since all of the 
Lazarus menus work in the same way, if you press RETURN 
once again the “General Program Use” menu item will 
“Pop-Up” as shown in Figure #3. Now press ESCAPE twice 
and you will be back at the Main Menu in Figure #1. 


You now know how to use two of the most important 
keystrokes within Lazarus - RETURN and ESCAPE. Simply 
put, just as in other menu driven programs, RETUIRN brings 
you down a menu level and ESCAPE brings you back up. 

Now that you know how to move between different menu 
levels, it’s time to learn how to move within a menu. Starting out 
at the Main Menu, press RETURN once with the Highlight 
Bar over the “Program Information” menu item. Now press 
the RIGHT-ARROW key to move the highlight bar over the 
Menu Items menu item and press RETURN. The screen will 
now look like Figure #4. 
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[FIGURE #3] 
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LAZAAMS 22 Jan 84 6:63:66 PH 
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————~ | 
Program Information 


| General Program Use 


| 
| 
| LAZAAUS #77 was desianed to overcome a COmMmON techs that 
j occurs when people interact with computers = ais 

| will restore any Apple 4/7 File that you accidentally deleted. 
programs that are extremely easu to use. 


| 

LL} | LAZAR sre is the first of a new generation of Hpple #77 

| the LAZAR 777 
| fienu Is se UP as a number of electronic file cards. 


to select, 4$t to move. 


Press: (scare) for prior menu, Cena’, roy - jo? for HELP. 


You may aisco type the name of your selection. 


[FIGURE #4] 
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Frograr Information 


Henu Items 


Use this menu to select information of the various Menu Items of 
LAZARUS F4é | 


Ct Set The Prefix © List Files 


& @uit The Progranr 


Press: i for prior menu, te select: ¢€4 4 to Rove. 
You mau also type the name of your selection. (Gamme?, d=? or a for HELP. 


Try the various arrow keys to see what they do. You should be 
able to move all around the various menus with the few 
keystrokes that you know. Remember, if you get “stuck” just 
keep pressing ESCAPE to get back to the Main Menu. 

By now you are probably wondering just how | gave Lazarus 
the rounded edges and all the fancy looks. For those of you who 
think that | did everything using the graphics capabilities of the 
///, you're wrong! Lazarus uses the most powerful tool that 
the Apple /// has to offer - changeable text! That’s right, all of 
Lazarus is done in the standard 80 Column X 24 Line text 
mode. This and the fact that over 75% of Lazarus is written in 
assembly language gives the program its amazing speed and 
looks. 


Help — ALL The Time! 


The new “Pop-Up” Menus are extremely easy to use but what 
happens if you are stuck on something and can’t remember 
what key to press? The answer is to simply look at the menu 
screen. If you will notice the bottom two lines on the screen you 
will see a quick description of the various keys that you can press. 
In addition to the keys that control movement, there are three 
keystrokes that will bring up HELP screens. The keystrokes and 
their effects are listed below: 

CONTROL-? Lists the keys you can press and tells what each 
one will do. 

OPEN-APPLE-? Describes the highlighted item. 

CLOSED-APPLE-? Describes the screen and its options. 

At the Main Menu press CONTROL-? and you will be 
greeted with the information in Figure #5. Notice how it tells 
you not only what keys you can press, but what those 
keystrokes will do. 
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[FIGURE #5] 
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Main Henu 


welcome to LAZAAUS s#// = The easy to use file restoration 
utility from the folks uho bring you Gey Magazine. 


f Undelete Files 


To Do This: 


Press This: 


+t, 4, & or 94 Hove the ee) bar over a Henu Iter. 
Bescend to 1ahlighted Henu Iter. 
» >: G U. L, & Hove the TERPRPGRA bar to the associated Henu Iter. 
det, or é=? Display a HELP screen. 


Press the SPACE BAR to Continue. 6 

To make this help screen go away, just follow the instructions 
at the bottom of the screen - Press the SPACE BAR to 
Continue. This is standard through all of the Lazarus help 
screens. After playing with this for a while you may notice that 
instead of pressing the SPACE BAR you can press the 
RETURN or ESCAPE keys to make the help screens go away. 
This is a handy addition for people who don't read instructions 
and remember that the ESCAPE key is used to “Back-Out” of 
the current menu. 

With the highlight bar over “Program Information” menu 
item, press OPEN-APPLE-? This will cause the display of Figure 
#6. This HELP screen tells you about the highlighted item - in 
this case “Program Information”. 


[FIGURE #6] 
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Welcome tc ZAZAAUS #// = The easy to use file restoration 
utility from the folks who bring you GY JASE Hagazine. 


Cf Undelete Files 


Select this Henu Item to lock over the many features of LAZARUS #77. 
It will teach you the complete operation cf the program. 


{ 
If you have any problems = look over these screens, they will usually 
have the answer. 


Press the SPACE BAR to Continue. é 
At the Main Menu press CLOSED-APPLE-? and Figure 
#7 will be displayed. This is the help information that describes 
the entire screen and its options. As you can see, it gives a quick 
description of all the various things that Lazarus can do. 


[FIGURE #7] 
LAZARUS 117 2 4 22 Jan 84 5:44:63 PH 
B 1962, 1993 QW IME Seki de uk 


} Helcome to LAZARUS #77 = The easy to use file restoration 
utility from the folks who brina you GY 7AKKE Hagazine. 


Cf Undelete Files 
Select the task that you want to perforr. 


These tasks are: 


Look at the Program Information screens ae instructions. 

Set The Prefix is used a § eed up ey rok ong file names. 

Look at the latest Information 

Undelete Files is the Affix of the program = use it to restore 
any of uour deleted files. 

List Files is used to list the file information of any directory. 
Quit The Program is used when you are finished restoring files. 


Go Ceee 


Press the SPACE BAR to Continue. 
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| could fill page after page with all the help screens of 
Lazarus but that wouldn't leave room for showing the other 
features. Just remember that wherever you are in the program, 
help is available. 

Now I'd like to show you some of the things that Lazarus can 
do, and how easy it is to do them. At the Main Menu, use the 
arrow keys or type “’S” to move the highlight bar over the Set 
The Prefix option. Now press RETURN and Figure #8 will 
be displayed. If you are at all familiar with the Apple /// you 
probably know something about the Prefix. This menu item 
allows you to set the Prefix. 


[FIGURE #8] 
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Set The Prefix 


Use this option to set the pathname Prefix. fs an example, set 
the prefix to: .PROFILE“LANGUAGES/ ei WORK. AER and you ce se 
its local mame (TEST.1) instea 


| then refer ta a File by 
complete pathname = ¢. BROFILE/LANGUACES*BASIC/HORK. AREA? Atet D = 


nk er the New Prefix: 


e 
F018 


tc select, ¢€44t to move. 


Press: {Escape} for prior menu, 
(eqrm)=7, d=? or é=7 for HELP. 


You mau aiso tupe the name of your selection. 


Even if you don’t know what the Prefix is, this screen (and its 
associated help screens) will help you learn. Press OPEN- 
APPLE-? and Figure #9 will be displayed. Remember that the 
OPEN-APPLE-? brings up help about the item that is 
highlighted. This is information that helps the user learn about 
the program. If this isn’t enough, pressing CLOSED-APPLE-? 
will bring up Figure # 10. This displays help about the screen in 
general. 


[FIGURE #9] 
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Set The Prefix 


Use this option to set_the pathname Prefix. As an example, set 
| | the prefix to: .PROFILE/LANGUAGES/BASIC/WORK AREA and you can 


This pathname should refiect 
..) which holds the deleted 


22 Jan 84 6:37:64 PH 
Prefix is .B! 


ili in the pathname for your new Prefix. 
the location (device or volume/directory/. 
‘tiles you would like to restore. 


er the New Pre 
hehe i re PeucuncES: ‘BASIC? WORK .ARER I 


a 
a 


Press the SPACE BAR to Continue. 


o- 
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Set The Prefix 


| 
| 
| 
| | Use this opticn to set the pathnane Frefix. As an example, set 

the prefix to: .PROFILE/LANGUAGES/BASIC/RORK .ARER and you can 


Setting The Prefix is a way of saving time when working with long file 
pathnames. Bu Setting The Prefix, you can refer to a file by 1ts local 
name instead of the complete (and long) pathname. 


| 
| 
| 
| 


Press the SPACE BAR to Continue. 
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It looks easy, huh? It’s even easier to work with! What 
happens if you want to change the prefix? Just press CON- 
TROL-? to list the keys that you can press. This help screen is 
shown in Figure #11. The editing keys are from the latest 
Apple User-Interface Standard and the same options will be 
used with all ON THREE products in the near future. 


[FIGURE #11] 
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| Set The Prefix 


RS an example, set 
-PROFILE/LANGUAGES/“BASIC/KORK .AREN and you can 


To Do This: 
Move the cursor left or right within the input text. 


Use this option to set the pathname Prefix. 
the prefix ta: 


Erase the character to the left of the curser. 

Erase the character to the right of the cursor. 

Erase al] the characters in the field. 

Erase ali the characters right of the cursor. 

Recall the field before evaiiges C UNDG). 

Accept t the entire respons 

Uisplays and allows you a select Files from the 
directory shown. Fress the SPACE BAK to Continue. 


P. 

As you can see there is one very interesting option, the File 
Selection feature. Just as in the System Utilities, Lazarus 
allows you to press the UP or DOWN arrow keys to display a 
listing of the files of the directory shown on the prompt line. To 
illustrate, change the Prefix to ‘’. PROFILE” (if you have one) and 
press the UP or DOWN arrow keys. A window will open up on 
the right side of the screen looking like Figure #12. 


[FIGURE #12] 
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| Main Henu eee JHTERES 
~ OH TERT 
| | Set The Prefix oe 
| Use this option to set_the pathname Prefix. an SYSTEH. PASCAL 
| | the prefix to: PROFILE’ LANG UAGES / Eiiey WORK. nee : SYSTEM .RISCINFS 
| | then refer to a File by its local mame (TEST.1) STSTEM. LIBRARY 
| | complete pathname = ¢.PROFILEY LANGUAGES: BASIC, WORK. SYSTEN.FILER 
SroT ey EE AOR 
L SYSTEH. COHPILER 
Enter the bag Prefix: SYSTER.RSSHBLER 
| [PROFILE /=» | SYSTER.LINKER 
SYSTEM SYNTAA 
GPCODES 6382 
ERRORS . 6982 
SOS 
VISICALC/ 
BASIC 
Press: for prior menu, to select, PASCRL/ 
jou may also type the name of your selection. fy ORE 


It all happens very quickly, even faster than the System 
Utilities does it! The files in the list that have a “/” after them 
represent sub-directories and may contain other files that you 
want to select. Now how do you select one of these sub- 
directories? You can find detailed information on doing this 
under the Program Information, File Selection screens or 
you can press CONTROL-? to give information about the keys 
that you can press. 

This help screen is shown in Figure #13 and tells you just 
how to select a file. As in most other things in Lazarus, this is 
the same throughout the program. You can select files to 
Undelete and directories to List in the same manner. 

The “MORE” on the bottom of the window shows that there 
are more files in the list. If you use the DOWN arrow key to move 
the highlight bar to the bottom of the screen, the files will scroll 
up within the window. If you press the RIGHT arrow key while 
the highlight bar is over “PROGRAMS/” (as shown in Figure 
#14) and then press RETURN, you will change the prefix to 
‘“PROFILE/PROGRAMS”. 
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[FIGURE #13] 
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Set The Prefix 


Use this option to set the pathname Prefix. as an | 
| | the prefix to: .PROFILE/LANGUAGES“BASIC.WORK AREA a} 


To choose a file from the list, use the up and down arrow keys (t, 4) 
to move the highlight bar over the file you would like tc choose and 
then press the right arrow key (9) to Select it. A ate arrow will 
appear on the sce eee to the file My remind ee which one a 
have Selected. fe change your sind and want to deselect a 

MOVE ae ryanlisht ar back over the Selected file and press fhe ieee 
arron key ¢ 


When you are finished selecting @ file: press (fmm) to accept it. If 
ugu change your mind about selecting a file, press (scare tc leave the 


File selection feature. 
Press the SPHCE BAR to Continue. 
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The new prefix will appear on the prompt line and the prefix 
displayed in the upper right of the screen will also change. This is 
shown in Figure #15. You can select files from sub-directories 
in the same manner as from the main directory. If you now press 
the UP or DOWN arrow key the files on the sub-directory 
PROGRAMS will be shown in a window. This is shown in 
Figure #16. 
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| Set The Prefix 


Use this option to set the pathname Frefix. fs_an example, set 
the prefix to: . PROFILE: ‘LANGUAGES! BASIC? WORK. Arce eae eel ce ea 
then refer to a file bu its local mame (TEST. 1 
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-| Enter the New Prefix: 
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¢€44t to rove. 
(axmm=?, de? or é=7 for HELP. 


tc select, 


Press: for prior menu, 
You may also tupe the name of ucur setection. 


Going now to some of the other options, List Files allows 
you to list any type (Regular, Deleted or both) of file on any 
directory or subdirectory. You can send the output to the screen, 
a printer or toa file ona disk. This is shown in Figures # 17-19. 
The same editing and file selection features discussed before 
apply to this part of Lazarus. 
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Press: (Estar) for prior menu, 
You may atso type the mame of your selection. 
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The heart of the program is the Undelete Files option. It will 
restore most any file that you have accidentally deleted. Very 
fast, the most time it will ever take to restore a file is around 45 
seconds. It can restore files from any drive connected to your ///. 
Regular floppy disks, hard disks such as the ProFile and even the 
high density Micro-Sci disk drives are all supported. If you can 
connect it to your /// Lazarus can restore files from it. 

Figure #20 shows what this option looks like. As the 
instructions say, just press RETURN and a window of deleted 
files will appear. Use the RIGHT arrow key to select a file as 
shown in Figure #21 and press RETURN to begin. 


[FIGURE #20] 
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enter the directory that holds the file you want to undelete and 
then press . Bh window will open on the right side of the 
screen displauing ali of the deleted files on that directory. 


Select the file you want to restore and press (mpM to begin. 


| | 
i | 
! 
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{ PROFILER 
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Tou Mad also type the name of your selection. 
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to select, $ t to rove. 


Press: (Escape) for prior menu, e494 
; (Gamiak?, d=? or d=? for HELP. 


You may alsa type the name of your selection. 


The program will then attempt to restore the file as shown in 
Figure #22. While the program is working to restore the file it 
will write a series of periods *’.”” across that window. This is so 
that the user always “Knows” that the program are working and 
has not “crashed” and stopped the computer. 


[FIGURE #22] 
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In a few moments, Lazarus should come back saying that 
everything was restored correctly. Figure #23 illustrates this. 
However, in the rare event that the information that you deleted 
is completely destroyed, the program will not be able to restore 
the file and it will tell you so. 


[FIGURE #23] 
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i Use this option to undelete Files that you have deleted. Below 
| enter the directoru that holds the file you want to undelete and 


File Restored with no problems. 


Please make a Back Up Copy before ng bale A 
Next time the program mau not be able to restore it. 


Press the SPHCE BAR to Continue. é 

After having finished restoring your file, Lazarus will ask you 
for aname to save the file with. This is necessary due to the fact 
that when you delete a file, the name of the file is sometimes 
changed. Use the screen shown in Figure #24 to change the 
name back. It’s that easy to restore your deleted files! 


[FIGURE #24] 
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change it back to the original name. 


a etn eet ores: 


—j tnter the name to_save the file with: 
| QONTIME TESTE ‘ 
| haven't mentioned it yet but one of the most important 
features of Lazarus is the Program Information screens. 
These menus will show you in detail how to use the program. 
We have essentially put the manual for the program INSIDE the 
program. For those of you who hate to break out the manual 
and page through it looking for details, with Lazarus you can 
just look through the Program Information screens! 


Closing Notes 


All of the windowing effects and very, very fast screen 
changes and movements were done with programming ease. 
The reason it was so easy was the fact that the necessary 
routines to do the windowing effects are built-in to the Apple 
LT 

While products such as Visi-ON and Microsoft Windows 
have to provide these things for the programs running under 
these systems, it is built-in on the ///. It’s really very funny and in 
a way | feel sad (at least a micro-second) for the people who own 
PC's and XT's. You see, the programs running on those systems 
are not nearly as “User-Friendly” as programs like Lazarus (yes - 
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we have more coming!), but because they run ina “Window” on 
an imaginary “Desktop” people buy them! 


These systems all consume vast quantities of memory and 
hard-disk space. I’ve heard reports that half a megabyte of main 
memory and up to one megabyte of disk storage space are 
necessary before you can put a single program onto either of 
these systems. That's a lot of money to lay out just so you can use 
a program that resides in a “W/indow” on your computer screen. 
It wouldn't be so bad if the programs worked as easy as 
Lazarus - but they don't. 


Many of our future products will use the same type of displays 
that Lazarus does to make it very easy on the user. Other 
developers are following on the Lazarus User-Interface and 
in the future there will be many more packages available that 
look like Lazarus. In fact, the new integrated package /// E-2 
Pieces follows the same general type of menu system of 
Lazarus though it doesn't have the pretty rounded corners and 
the general look of Lazarus. 


Even after a few pages | still can’t tell or show you all of the 
help screens and things that Lazarus has to offer. It’s more than 
just a utility program, it isanew way of thinking about programs 
for the Apple /// . Many people didn’t think that this type of a 
program could be written for the /// - that only the Lisa and the 
new Mac could provide that type of easy to use and spectacular 
looking program! Well, Lazarus shows that it can be done - and 
will be done again in the future for the ///. 


Future Plans 


What things are in the future for the Apple /// and /// 
plus? Well, ON THREE is working on the Lazarus Toolkit 
that will enable all future programs to use the same User- 
Interface of Lazarus. As easy to use as Lazarus, it will create 
the Menu System and Help screens for your program. With a 
little luck and a lot of hard work it should be available in July to 
developers. 

While Lazarus and programs that use the Lazarus Toolkit 
will require a standard 256K Apple /// or /// plus, the 
expanded capabilities of these programs due to the Toolkit will 
not require massive amounts of memory and disk space. The 
reason: While the PC requires you to spend extra for the 
Capabilities, the Apple /// has them built in! Believe it or not, 
we do have a leg up on the PC! 


By providing many of the tools that we built for Lazarus, 
other programs will soon be able to follow this very easy and 
truly User-Friendly type of program. The net result: In- 
creased Productivity for everyone using the /// . Who 
knows what's next - maybe someone will come out with a 
Visi-ON type of system for the /// - and maybe it will 
be ON THREE! 

Lazarus ///_ is available at finer computer stores 
everywhere and may be ordered directly through ON 
THREE for only $29.95. Lazarus /// requires an Apple /// 
with 256K or an Apple /// plus. 


Editor’s Block: continued... 


One of the other programs that you should have, Lazarus, is 
described in this issue. Read over that article and see just why 
people are so excited about it. Looking further into this issue, Al 
Evans is back with some more amazing things for the /// with 
his regular column and article PASCALULATOR. 
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Using VisiCalc for decision support is shown in Llona 
Cunningham's article while the W/PL section this issue is on 


merging PFS and WPL files by Jay Merritt. Kevin Fitz- 
Maurice tells us why the Apple /// is the USER’s Micro while 
Ken Johnson shows us how to Automate Access ///. 


David Cortopassi tells us of the joys and tribulations of 
designing CROSSWORD-SCRAMBLER, the exciting new 
educational game for the Apple /// in the article So The Apple 
/// \s Only A Business Computer, Huh?. Melvin Astrahan 
(author of Draw ON ///) also joins our ranks this issue with the 
beginning of his series on Apple /// graphics. 


And all this is just the tip of all the great information packed 
into this issue. Look over the table of contents for everything else 
- | can't give away everything! 


For those of you who are concerned, we will do our best to 
publish on a more regular basis in 1984. You can help out! Please 
send in your article submissions today. 


Next time around will be a number of reviews: Word Juggler, 
Apple Speller ///, BPI and more will be covered. Family Finance 
with VisiCalc, SOS Drivers & CP/M for those who are using that 
language system. We are going to attack WPL next time - From 
ALL angles. A Business Basic Program Lister to provide fomatted 
listings for those hard to read programs of yours and we will 
even take a deeper look at Lazarus with Pieces of Lazarus? Please 
stick around, there’s still something for everyone! /// 


for the Apple ///" 


If you program 
in Business 
Basic, 

you shouldn’t 
be without it. 


| © Array manipulation, insert - 
© Change file types. delete elements, move sections 
© Reset protection. of arrays, search arrays. 

© High speed disk routines, 10 ® Character Set Editor, create 
times faster than Basic, up edit your own character sets. 
to 30% savings in disk space. © Disk Block Editor, view or 

© Access to any block on a edit any block on a disk. 

disk. © And more, all for only $95. 


FOXWARE PRODUCTS 
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So The Apple /// Is Only A 


Business Computer, Huh? 


‘m hooked! | love my Apple ///. It’s great!... It’s wonderfull... 
But Where's All The Software? | see no reason why | should 
constantly run under Apple J[ “Emulation”. The Apple /// is 
capable of so much, and yet because there aren't very many 
///'s out there, software houses virtually ignore it, since the 
market is small compared to that of the Apple J[. Another blow 
to potential buyers of the /// was the introduction of the //e. I’m 
sure this was a positive move for Apple Computer (let’s face 
it... the //e is exactly what the doctor ordered for a hungry 
pocketbook), but everyone is still ignoring the ///. 

Just take a look at the listings of popular software and 
compare. Publications are hard pressed to limit or select the 
top applications available for the ][ (99% of which run on the 
//e). This listing usually takes up a good 10 pages, compared to 
1 or 2 columns for the Apple /// (a complete list). 

But, the market is growing steadily, and for the entrepreneur 
this could very well be the direction to go! Indeed, there are 
literally hundreds of computers flooding the market. But you 
can be sure that many (if not most) will die a quick and painful 
death as fast as they were designed. I'd certainly be miserable if 
| worked 6 months on my dream program in that new 
“FOUL” language “Fly-By-Night Computers” supplied with 
their B-52 compiler, only to find out they just filed for a chapter 
11 (bankruptcy). 

So, given this line of logic, it was only logical to commit 
myself to the Apple ///. And being a basic-plus programmer on 
a larger system led me to (da-daaa!) “Business Basic’. Powerful 
isn’t the word to describe “Business Basic’’... I'd have to go with 
Awesome. I guess that makes me a Valley Pro- 
grammer. 

Where do | start? Graphics? Well, not in the true sense of the 
word. Although the /// has extensive graphic capabilities, I’m 
not obsessed by super-duper space probes emitting bursts of 
electo-phaser beams or what-have-you. But | DO get off on 
cursor control combined with “Normal” and “Inverse” screen 
display. | suppose one could think of this as a sort of “pseudo- 
graphics’. That, combined with “WINDOW” command 
spurted me to undertake what turned out to be a colossal 
project. Which, after about 3 months of part-time dedication 
blossomed into CROSSWORD-SCRAMBLER. 

Though | was not unfamiliar with data. processing, | had 
never owned a personal computer before | purchased my 
Apple ///. | was disciplined in system concepts enough to 
formulate my ideas for crossword-Scrambler. | KNEW IT WAS 
PRACTICAL TO DO IN THIS LANGUAGE. This is some- 
thing that | think should be decided before taking on any 
project. Simple experimentation showed promise and immedi- 
ate reward. \ 

| was also concerned with sound generation. With the aid of 
the system manuals and the Business Basic documentation, | 
managed to crank out the William Tell Overture in a respect- 
able amount of time. | wasn’t after laser-blast sounds, or 
shooting cannons; frankly, | still don’t even know if it’s possible 
to create these over-used effects with Business Basic. (Almost 
anything is possible - Ed.) W/nat | wanted though, is what | got. 

Between chapter 7 and appendix E of the Standard Device 


by David Cortopassi 


Drivers Manual, it was a matter of editing the program 
example on page 131 to play a musical composition. Being a 
musician for the greater part of my life was an advantage here 
since | could relate tones to numerical values while visualizing an 
instrument or keyboard. | don’t think it is prerequisite to have 
any musical knowledge though to do this, just more patience. 

A good part of my interest was also in educational applica- 
tions. | suppose this was partly due to the great need which 
exists to close the computer illiteracy gap. | also have a son who 
needed to learn something other than how to kill an invader 
from planet 6502. Thus, my vision started to take on tangible 
form. 

| started with the initial screen display. This took a little time, as 
| was also after the quickest execution speed | could achieve. 
Section G of the Business Basic manual on ‘Speeding Execution’ 
was handy, clear cut, and to the point. | experimented by 
manipulating individual characters too, as opposed to printing 
one entire character string line. | soon found out the following: 

10 FOR I=1 TO 40:VPOS=1:HPOS=I:PRINT 
CHRS(61): NEXT 

was slower than 


20 PRINT AS 

Strings and line numbers take up a lot of room. This began to 
matter a great deal later on when memory errors started 
popping up. | knew | wanted CROSSWORD-SCRAMBLER 
to fit into 128K. | also wanted the entire product to reside on 
one disk, and be a TURNKEY system. 

By using the System Utilities diskette | was able to open up 
quite a few blocks of space through reconfiguring the SOS. 
DRIVER to only recognize the built-in drive. | also deleted 
-PRINTER and .SILENTYPE since | had neither and 
CROSSWORD-SCRAMBLER wasn't going to need these 
devices. | should point out that | didn’t actually delete .D2 until | 
absolutely had to, as | desired to do the greater part of my 
programming with this capability. 

Eventually, | used only the minimum system requirements 
for running CROSSWORD-SCRAMBLER as a _ turnkey 
system: 

SOS.KERNEL 

SOS.INTERP 

SOS.DRIVER 

Other Business Basic programs and data files such as 
RENUMBER, BGRAF, TIMESET, and extraneous fonts were 
also removed. 


NOTE: The master disk used to make copies was created on 
a newly formatted disk. Each file or program was then copied 
individually to the new disk one by one, in a logical sequence 
using the System Utilities. The advantage to this method of 
FILE transfer rather than copying an entire disk is in making 
each file continuous; squeezing that teeny-tiny last bit of quality 
performance out of your work . It can also open up two or three 
more blocks if space is at a premium. This is a result of less 
fragmentation in the distribution of data on the disk. In the 
example above, BLOCKS FREE went from 19 to 24 after 
re-building the disk. All files except score files were then 
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locked as a precautionary measure. Score files are updated 
and thus must be unlocked. | 

One of many nice features about Business Basic is that it 
somewhat ‘‘structures’’ your code automatically. Unlike 
Pascal, where you can indent or lay out code in a definitive 
outline form, most basics left-justify every line. In fact, Business 
Basic left-justifies your code too. But, it also follows certain 
pre-defined rules for indentation and nesting of FOR/NEXT 
loops and such. This aids tremendously in being able to debug 
later on. 

| finally ended up with a pretty quick screen display, and with 
a few minor alterations, it was able to run continually as you 
might see a game operating in a video parlor. After completing 
each section of code, | would re-program the section in order to 
cram as much as | could into one line number. This might seem 
to be bad programming structure to you, but | was more 
interested in saving K’s than in word processing. Another 
reason for cramming code was that | didn’t intend for the world 
to be able to decipher my work, and being that Business Basic 
runs source code means that it can easily be copied or modified 
to market someone else’s product. 

“Fantastic!”, | thought. Who else was going to pat me on the 
back but me? I could see my vision unfolding right before my 
eyes. But now came the hard part, and strangely enough it had 
nothing to do with computers at all. |! now had to make up some 
crossword puzzles! 

| had decided on 5 different categories: Animals, Heroes & 
Villains, States & Countries, Anything Goes, and Music Quiz. | 
then bought some graph paper to figure them out. | found it 
much harder to make a crossword puzzle than to actually do 
one. This process took me almost as long as the programming. 
| used encyclopedias, dictionaries, comic books, a thesaurus... 
you name it. It was a dreadful task that literally kept me awake 
long into the night. | still wasn’t done with words. | had to make 
up descriptions for each word. Spelling was another problem. 
“Taint none to such good at disort a ting.” You can lose a lot of 
credibility putting out an educational product with mistakes. 

At this point, | had to write a few QO+D (quick and dirty) utility 
programs to create and store a data file for each subject. | kept 
these utilities on a separate diskette along with sound and 
music generator programs which | used to create songs, and 
various tones used to alert the player if she/he answered 
wrong, right, won bonus points, etc. These short subroutines 
could then be transferred and inserted into the desired 
program. 

So now that | had created the puzzles, | had to get the screen 
to format correctly; i.e., blanking out numbers in some squares 
with NORMAL, while leaving those numbers that would be 
used to reference words either D) down or A) across. | used 
data statements again to accomplish this, combined with a 
FOR/NEXT loop this time with conditional modifier. 

It wasn’t easy to formulate this equation, but | found it 
extremely intriguing. Once | got it, it was a similar process to 
change the remaining puzzle formats by substituting numbers 
in the data statements. | determined | would break each subject 
down into separate programs, and run the corresponding 
game depending upon which subject was chosen from the main 
display. This is a menu-style fashion. 

| found the escape key invaluable for editing and piecing 
Programs together. In no time, | became very adept at using 
Cursor commands as explained on page 51 of the Standard 
Device Drivers Manual. I‘d list a sub-program, set the top of 
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screen to be at the bottom of the listing, load the program | 
wanted to append (without disturbing the screen listing 
display), and then reset the screen to full viewport. Next | 
would press escape again move the cursor to the line to insert, 
press escape once more, and right arrow over to the end of the 
line followed by a RETURN. When doing this, you must be sure 
that line numbers do not conflict, otherwise, you might replace 
a line rather that insert one. 

After completing the first program (Animals), it was a matter 
of alerting the same program to reflect each different subject. | 
found this easier than writing one M-O-N-S-T-E-R program. 
The reason being two-fold: 1) At the time, | didn’t have a printer 
to make long listings (I was reading only from the 24X80 
screen), and (2) since | wanted it to fit on a 128K system, 
memory size was becoming a main concern. 

To eliminate the above mentioned problems, | resorted to 
page 246 of the Business Basic documentation on memory 
usage. | found this both enlightening and confusing. It took me 
quite a bit of time to get the proper use of the X=FRE 
Statement. It seems Apple means this statement quite literally. | 
tried to assign “FRE” every variable in the book without 
dreaming of using “xX”. This eventually saved my life when 
repeatedly referencing array and searching data statements, 
especially at the second level called “SCRAMBLER”. 

The CLEAR statement cleared all variables including the 
score. The ‘FRE’ statement reclaimed pointers without dis- 
rupting values needed for proper execution. | used the arrays 
to flag words that had already been put to the screen and filled 
into the proper place on the crossword grid. Words were listed 
alphabetically to speed searching with an “If greater - then 
return” comparison. In this way, the program could verify input 
and the possibility of cheating through repetition of a word 
more than once to rack up points. 

Well, naturally there were other problems, most which 
appeared insurmountable. Debugging took time. | can honestly 
say though, that near the end | was so sick of Crossword- 
Scrambler | had to set it aside for a couple of weeks. Of course, 
my brain was still actively thinking up ways to improve upon my 
work. During this period | masterminded what | think to be an 
innovation in educational software packages: PASSWORD 
PROTECTION!!! 

One might ask the question “why a password?” There are in 
fact many answers. Passwords are an everyday occurrence 
within the computer industry. Indeed, should a person become 
heavily involved with computers, they will undoubtedly use 
many passwords in a single day or hour. The concept of 
password protection and data security is one facet of which to 
become extremely aware. The password is therefore meant as 
a lesson in data security. 

What a tremendous idea! Nobody ever includes a security 
concept in educational software, and every business uses 
them. Corporations spend a great deal of time, effort, and X 
amount of dollars on data security and encryption in an effort 
to prevent unauthorized access to private information. Just as 
you might not want your next-door neighbor to know how 
much money you make or owe, the idea of this can be 
illustrated visually. Many people aren’t aware of passwords and 
their purpose. It seemed only natural to implement this lesson 
within the context of computerized educational instruction. It 
was an easy addition to CROSSWORD-SCRAMBLER. 

Each game's previous score was stored on the disk at the 
end of program run. So, at the start of each game | gave the 
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user the option to see what the last score was for that particular 
game. Only, in order to see the previous score, you first have to 
give a password upon selecting that option. Of course, the 
password is included within the documentation, the purpose 
being ‘example’ rather than true security. 

Another stumbling block worth mentioning is that the Apple 
/// (as does the //e) accepts BOTH UPPER AND LOWER 
CASE CHARACTERS! Wonderful! What this means is that 
when comparing character strings: 

“This <> THIS” 


| haD tO WRItE anotHer SUBRoutInE 
to HAnDle THiS PRObleM! 


Though | really felt it unnecessary due to my USER- 
FRIENDLY Format, the final stage was to document my work 
so explicitly and completely that even someone who had never 
touched more than a light switch could instantly feel like a 
computer guru. (1 meant TURNKEY when | said turnkey!) | 
inserted on-line documentation, together with hard copy type- 
written information. 

As | stated above, | copyrighted all of CROSSWORD- 
SCRAMBLER before making the product available. This is a 
simple process and the most desirable for software protection 
to date. 

Being as | was using SOS, | needed to get Apple Computer's 
permission to market a product which uses their software. 
Apple encourages new products, and for a slight fee of only $50 
a year, they signed a contract authorizing the use of Business 
Basic under a company | personally own Called SOFT- 
PROTEX. Of course, | could have just marketed the source 
programs without SOS (not a bootable diskette), but that 
would not be a turnkey system. 

To date the greatest enjoyment | have received from all my 
BS and Tears, is seeing my son actually select CROSS- 
WORD-SCRAMBLER from an extensive software library. 
And, he has not only learned about each subject covered, he 
was right there while | was programming it! I'm amazed at his 
own capabilities when it comes to programming. He learned a 
great deal about basic by watching me. I've given him his own 
basic diskette, and now he asks me to run HIS programs, and 
get through HIS passwords! He even reads the manuals! | wish 
| had started that young (8 years old). 

Other techniques of merit in favor of Business Basic /// are 
listed throughout the basic manuals. These are usually in a 
logical or relevant chapter. The ONLY derogatory things | can 
say with regard to documentation is: ‘Why isn't the index 
included in the back of both volumes 1 and 2?”. This of course 
is extremely minor, but nonetheless was irritating at the proper 
moment. Better yet, why can’t both volumes be combined into 
one? 

Another thing that would be great to have would be a 
command that automatically puts your program into ‘text’ 
filetype format. Having to go through the trouble of opening a 
text file and using the LIST command with the output going to 
the text file, and then closing the text file, etc. is a waste of time. 
Why not just have another command like SAVE... only 
SAVE TEXT. 

| eventually had to make text files of all programs for 
submitting to the U.S. Copyright Office along with the 
necessary forms. As a rule | followed the sample program on 
page 33 of the Business Basic manual, only in immediate mode 
(without line numbers). This is one place where | found a small 
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error in Apple documentation. Line 1 in the example at the 
bottom of the page should read: 

1 CREATE “‘Goodlines”, TEXT 
with the comma to the right and outside of the double quote 
rather than 

1 CREATE “Goodlines, “TEXT 
A “’SAVETEXT” command would have been super! 

| found the ON KBD statement a little mysterious, but | did 
manage to get it working properly. | think this and a few other 
commands could show more simplified examples. Still, I'm 
sure many would think they were straight ahead. | don't 
particularity like the idea of no compiler. Whether needed or 
not (this basic is fast), not everyone wants their source code to 
be public. And how do you disable the reset button or 
control/reset like Apple Writer ///? As far as | know, it’s 
impossible. All | was able to do was trap Control/C and wrong 
type input errors. Also, | would have appreciated more concise 
information on SOS calls in the Standard Drivers manual. But 
then, I'd like to have a Quadra- Bazillion megabucks in the 
bank too! All and all, the Apple /// “Blows Me Away”! 

As you can tell, | can’t say enough about the ease of 
programming in Business Basic and the completeness of the 
documentation; not just because I’m an Apple employee, but 
because I’m aware of all the garbage out on the market today. 
The Apple /// is a superior high-technology, and judging from 
the looks of prototype software | see at MIS in Cupertino, 
Apple is committed to the same excellence for the /// as the J[, 
//e, and LISA. 

CROSSWORD-SCRAMBLER requires a 128K or 256K 
Apple /// with the built-in drive and monitor. 

[David Cortopassi has been on the MIS Operations Staff with 
Apple Computer, Inc. since 1981. He is also the author of: 
CROSSWORD-SCRAMBLER - an educational software 
product that can be purchased exclusively through ON 
THREE Magazine.] /// 


Continued from page 40. 
READ (ACK); WRIT 
WRITE (CHR (1))s wre, (CHR (28)); { Reset viewport & clear screen } 
IF (ACK = CHR(27)) T 
EXIT (PROGRAM) 
END; { Of PROCEDURE Introduction } 


GIN 

Introduction; 

REPEAT 
WRITE (“Pascal UNIT NUMBER containing emulation disk: ‘); 
READLN ¢EMUL_UNIT) ; 

UNTIL (Emulation Disk Verified); 


Patch Character Set; 
WRITELN (’Your new emulation disk has been converted.’ ) 


Continued from page 31. 


control of those pounds of notes. Or perhaps youre an 
attorney. Does the Apple Writer /// Database suggest a way to 
call up those specialized paragraphs you need for contracts ? 
Or maybe you've been wanting to catalog all of those dozens of 
computer articles, and you'd like to include some notes of your 
own. 

Or could it be you're a science fiction writer ? 

| Wonder what might come up if | combine all those ideas 
about aliens, with the ones about computers ? 
[L].d1/ WHAT IFSICALIEN> <COMPUTER> IA 
Hmm. Just might be a story there... 
HHHAH 
[Sharon Webb is the author of the EARTH SONG TRIAD, 
published by Bantam Books, and a member of Author's 
Guild/League; Science Fiction Writers of America] /// 
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by Al Evans 


Math on Demand in Apple /// Pascal 


UCSD Pascal, particularly as it is implemented on the Apple 
///, offers a marvelous environment for the development and 
use of complex software systems. However, the outer “opera- 
ting-system” level cannot be characterized as user-friendly. 
While enormously flexible, it is rigidly structured and cannot 
readily be altered or expanded. Unless the system’s designers 
Included what you want to do among the commana-level 
options, you have to write and compile a program to do it. 

One difficulty | often encounter is the impossibility of typing, 
for example, “PRINT 2*(289+71)” and getting an immediate 
answer. This problem arises during software development or 
while working with my bookkeeping system or another number- 
manipulating program. For example, | can never remember the 
factors for converting degrees to radians or radians to degrees. 
And | may not be able, at any given moment, to figure the tax on 
$73.37. But | do remember how to calculate 5% of 73.37 and 
that 2 pi radians equal 360 degrees. 

Unfortunately, this knowledge is of little direct benefit in the 
UCSD Pascal environment. My only alternatives are to stop what 
| am doing and go to Basic or VisiCalc, perform the calculation, 
write down the answer, and reboot in Pascal, or use a calculator 
or pencil and paper to get the result. 

| decided a routine which could be used in two ways was 
required: a stand-alone “pocket calculator” and a callable 
procedure which would, within the context of any program, 
evaluate a mathematical expression and return the result. For 
generality and ease of implementing additional operations, | 
chose to use real numbers for all calculations despite their limited 
(7 to 9-place) accuracy. Finally, since computational speed is not 
terribly important during keyboard input, | designed the 
procedure easy to modify and understand, rather than for speed. 

As presented here, the unit PASCALCULATOR and the 
program TEST_CALC make up a stand-alone calculator which 
will add, subtract, multiply, divide, and exponentiate. It under- 
stands parentheses, and is not too particular about their being 
balanced. The unit includes a callable procedure ‘’Str_to_Real” 
which converts real numbers expressed as strings to values of 
the type Real. PASCALCULATOR can be used from any Pascal 
program. 


How To Use PASCALCULATOR 


PASCALCULATOR is written as an intrinsic unit which can be 
placed in a library and used from any program. Enter it as shown 
in Program Listing #1, save it as “CALC.UN”, then compile 
it to a codefile of the same name. The SYSTEM.LIBRARY 
containing the units TRANSCEND and REALMODES must 
be on-line when the unit is compiled. Before an intrinsic unit can 
be used, it must be installed either in the system library or in a 
program library. Execute the utility program LIBRARY (origi- 
nally found as LIBRARY.CODE on the volume /PASCAL3). 
Answer ““TESTCALC.LIB” when the program prompts for an 
output file name. Answer “CALC.UN” when asked for an input 
file name. You should now see two tables, each containing 16 
Slots. Slot 1 on the top table contains PASCALCU, and the 
bottom table is empty. Type “1 <SPACE>”, then “O <SPACE>” 
(to transfer PASCALCULATOR to slot 0 of your new library). If 
you wish, you may now transfer REALMODES and TRANS- 


CEND from the system library to this program library. To do this, 
type “‘N” for anew input file, enter SYSTEM.LIBRARY for the 
file name, and move these units to unused slots of the output 
library. Now type “OQ” to quit, and enter any notice you want (or 
just press CRETURN> for no notice). Your new program library 
is NOW Operational. 

Enter the program TESTCALC (Program Listing #2), save 
it as TEST_CALC, compile, and execute it. You should now be 
able to enter any numeric expression and get either a correct 
result or an error message pointing to the character which 
caused the error. If not, proofread the unit PASCALCULATOR. If 
you still can't find the problem, the procedure Calculate includes 
a local procedure named Diagnose, and a commented-out call 
to that procedure. Remove the brackets from around the call to 
Diagnose, recompile the unit, and re-install it in the library. This 
procedure will provide a complete dump of the operator and 
number stacks after each step of processing, along with the 
name of the next process stage and the position of the next 
character to be scanned. When things are working properly, 
comment out the call to Diagnose, recompile again, and 
re-install the debugged unit in the library. 

The technique demonstrated in TEST.CALC can be used to 
operate PASCALCULATOR from any program. 


How PASCALCULATOR Works 


Friendly real numbers 

The first problem | faced in writing this program is actually one 
of Pascal's best features: strong data typing. This aspect of the 
language is wonderful for developing well-defined programs 
which always behave exactly as expected. But my experience is 
that it has to be defeated at least once in every non-trivial 
program intended for use in the real world. In the present case, 
the problem is that UCSD Pascal is so intransigent about real 
numbers input from the keyboard that (1) it doesn’t allow 
backspacing for correction and (2) any entry which is not a 
legitimate part of areal number crashes the system. This is totally 
unacceptable from the user’s standpoint. 

For ease of entry and manipulation, | decided that the entire 
expression would be entered as a string, which would then be 
parsed and evaluated by the supervising procedure ‘‘Calcu- 
late”. Therefore | first wrote the procedure “Str_to_Real’” which 
accepts a string and returns a real number in a designated 
variable. This procedure will correctly evaluate a real number in 
any format acceptable to UCSD Pascal. In addition, it will accept 
a number which begins or ends with a decimal point. It sets the 
boolean parameter ERROR to TRUE and the result to zero if it 
encounters a syntax error in the numeric string being evaluated. 
Like most Pascal procedures, Str_to_Real can be used in any 
program, the irritation of having to write these type-conversion 
routines is offset by the fact that you only have to do it once. 

The main body of Str_to_Real extracts a mantissa sign and (if 
present) an exponent sign and exponent from the string passed 
to it. Whatever is left is considered the mantissa. Str_to_Real uses 
the local function Pos_Real to convert the mantissa and 
exponent to real values, multiplies the mantissa by the mantissa 
sign, and multiplies or divides the result by 10 to the (exponent) 
power, depending on the sign of the exponent. The procedure 
sets the boolean parameter ERROR to TRUE in two cases: if a 
portion of the input string passed to Pos_Real contains anything 
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error in expression. Values of X: PRES_POS:= PRES PUS + 1; 
0: Successful completion PROC_STAGE:= UN_OP t Set to start over ) 
Invalid number END ~ 


T 

2: Number expected here 

3: Operator expected here PROC STAGE := GET_NUM 

4; No piponen station of negative numbers END; { OF PROCEDURE Check Open Paren } 
J: Cannot understand expression 

6: Division by zero attempted 


7: Number/result over] ow } PROCEDURE Get Number ; 
tt te = ” % ERR + PRES POS; BEGIN 
SULT := { First character must ‘be a digit ) 
{ app S// “ REALMODES -- restore previous real number environment } IF (NOT (EXPRESSIONEPRES P $) IN (NUNS - (’E’,’e’]))) THEN 
est _Enu (MATH_ENV); Error (2); 
EXIT (Calculate) NUM START:= PRES POS; 
END; { Of PROCEDURE Error 3 PRES POS:= PRES POS if: 
{ Subsequent characters nust be digits or "E* except for the character 
immediately following an "E", which can be a "+" or °-". } 
PROCEDURE Find Next_CH; { Called to skip spaces } WHILE Senne (PRES si IN NUMS) OR 
BEGIN (EXPRESSION (PRES POS - 1] IN [7E’,’e’)) AND 
WHILE ie rete bee POS) = ’ ’) AND (PRES POS (= IN_LENGTH)) DO  CEXPRESSION [PRES POS) Hs N 0ps)}). AND 
PRES POS:= PRES POS + | (PRES POS <= IN_CENGTH) 
END; { Of PROCEDURE Find Next_CH } Res POS:= PRES POS + 1; 
{ Now the end of the number has been found } 
Str_to_Real (COPY (EXPRESSION, NUM_ START, PRES POS - NUM_START), 
Fiera Perform_Operation; FACTOR, REAL “ERROR: ~ 
VAR A REAL ; IF NOT REAL ERROR. THEN 
PAES OP: CHAR; WITH NUMBER STACK DO 
FUNCTION Mult "AB (A, B: REAL): REAL; BEGIN 
POINTER:= POINTER + 1; 
BEGIN FACTLPOINTER) := UN_ FACT * FACTOR 
Mul t_AB:= A # B 
END; {Of PROCEDURE Perform Operation ) Sih 
PRES POS:= PRES POS - 1; { Back up one space } 
ae Divide AB (A, B: REAL): REAL; erent (1) 
IF (B = 0) THEN PROL Pi rase = CLOSE_PAREN 
BEGIN END; (Get_Number } 
PRES POS:= PRES POS - 1; { Back up one space } 
Error (6) 
END; PROCEDURE Check_Close Paren; 
Divide AB:= A/B _ BEGIN 
END; { OF FUNCTION Divide AB } IF (EXPRESSIONEPRES POS) = ’)’) THEN 
cd DO 
FUNCTION Add_AB (A, B: REAL): REAL; WHILE (POINTER > 0) AND 
BEGIN (NOT (OPEPOINTER) IN [7¢7,7<7])) DO 


Add AB:= A + B Perform pbetatiens 
END; { Of FUNCTION Add_AB } CASE OP{POINTERT 
‘<7: BEGIN: ( Negative open paren n } 
NUMBER_STACK .FACTINUMBER_STACK POINTER) := 
FUNCTION Subtract_AB (A, B: REAL): REAL; NUMBER” STACK .FACTINUMBER STACK POINTER) ; 
BEGIN i” Pe POINTER - ! 
Subtract AB:= A - B 


END; { Of FUNCTION Subtract_AB } nat plineR = POINTER - 1 
Pred ee PRES P 
FUNCTION A_to_the B (A, B: REAL): REAL; nee STAGE := EPOSE parE { Check for another ’)’ } 
IF (A < 0) THEN BEGIN ELSE 
PRES POS:= PRES POS - 1; { Back up one space } PROC_STAGE:= GET _OP 
a (4) END; { OF PROCEDURE Check Close Paren } 
A to the B:= EXP (B # LN (A)) 
END; (Of FUNCTION A_to the B ) PROCEDURE Get_Operator; 
IF (EXPRESSIONIPRES POS) IN OPS) THEN 
BEGIN ( Perform -Qperation 2 WITH OPERATOR STACK DO 
IF (COPERATOR STACK.POINTER < 1) OR (NUMBER STACK.POINTER < 2)) THEN BEGIN 
Error (5): WHILE (PRECEDENCELOP{POINTER]) >= PRECEDENCELEXPRESSION[PRES P0S))) DO 
A:= INGER "brace, FACT{NUMBER STACK POINTER - 1); Perform rae on 
B:= NUMBER STACK .FACTINUMBER STACK. POINTER); POINTERs= POI 
NUMBER STACK POINTER:= NUMBER STACK POINTER - 1: OPLPOINTER) := NEXPRESSI ONEPRES POS); 
PRES OP:= OPERATOR STACK.OP{OPERATOR STACK. POINTER} ; PRES POS:= PRES POS ¢ 1; 
OPERATOR STACK .POINTER:= OPERATOR STACK.POINTER - 1: PROC_STAGE:= UN_OP 
CASE PRES OP OF END 
aa NURBER STACK.FACTINUMBER STACK.POINTER):= Add AB <A, 8): ELSE 
“=/+s NUMBER STACK FACTINUMBER STACK POINTER) := Subtract a (A, B); Error (3) 
“#71 NUMBERSTACK . FACT (NUMBER STACK POINTER) := Mult AB % END; { Of PROCEDURE Get_Operator ) 


‘/’+ NUMBER STACK .FACTINUMBER STACK. POINTER) := Divide AB ar hy, 
Shee *+ NUMBERTSTACK.FACTINUMBER STACK POINTER] := A_to the B (A, Bd tie 


END; Savéne (MATH_ENV); ( Apple /// -- save current real number environment ) 
IN LENGTHs= LENGTH (EXPRESSION) 


AlTow EXPRESSION LIN LENGTH#1] {o be addressed to simplify range checking } 
EXPRESSION:= Concat(EXPRESSION, ’X’); 


_ 


PROCEDURE Check_Unary Operator; 
BEGIN 


IF (EXPRESSION(PRES POS) IN UN_OPS) THEN PRES POS:= 
BEGIN OPERATOR ‘smal, POINTER:= 0; 
IF (EXPRESSIONIPRES POS) = ‘-’) THEN NUMBER _STACK.POINTER:= 0; 
UN_FACT:= -1 STATUS:= 0; 
ELSE™ PROC STAGE:= UN OP; 
UN_FACT := WHILE (PRES_ POS <= IN_ NCENSTAO Db 
PRES_POS:= “eres. POS 4 1 
END PEASE PROC_STAGE OF 
ELSE UN OP: Check_Unary Operator: 
UN_FACT:= 1; OPEN PAREN: Check Open Paren; 
PROC_STAGE := OPEN PAREN GET AUN: . Get Number; 
END; { Of PROCEDURE Check_Unary_Operator } tae PAREN: eect Close _Paren; 
GET 0 apers or; 
END; ¢ CASE pote mh 
PROCEDURE Check Open Paren: Find [Next_CH} 
BEGIN { {-- Put stack dump call here for debugging } 


Dia U 
IF (EXPRESSIONEPRES POS) = ’(’) THEN END: ( { ‘WHILE PRES POS <= IN LENGTH } 
OR elles STACK DO 


~_ 


Finis H operations on stack } 

renee (OPERATOR STACK.POINTER > 0) DO 

POINTER:= POINTER#1: ope arens left on stack are meaningless; _pop them off } 
IF (UN FACT = 1) THEN iP (OPERATOR STACK .OPLOPERATOR STACK.POINTER) = ’¢’) THEN 
EOE «45 ec STACK .POINTER:= OPERATOR STACK.POINTER - 1 


_o 


BEGIN Perform Operation; 
{ If UN_FACT is -1, combine the -1 and IF everythin worked right result is on top of number stack } 
open pron into a "negative" on paren. } RESULT := NUMBER STACK.FACT I]; 
NTERJ:= ’°<’s { ’Negative’ open paren } are /// REALMODES -- If overflow then return error message } 
ND FACT:= | ] Sod ne (RESULT)) THEN 
: rror 


~~ -_ 
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PFS —- WPL Merge by Jay Merritt 


hen | first worked with WPL over a year ago | thought it 

was the greatest thing since BASIC. Mainly because of the 
speed of execution, searching, etc. | started using it to create 
utilities for many of the customers we have here at the store. | did 
some crazy things with it at first, just to figure it out. Then an 
application came up at one of the local banks which caused me 
to think in a different direction: Mail List Merging. 

Now you're probably asking yourself, why didn’t you use the 
built in merge for Apple’s Mail List Manager ? Well, it’s a great set 
of routines, but it won't work on the Profile, and won't store 
birthdays, safety deposit boxes, dogs names or sort by zip code. | 
recommend PFS:FILE/PFS:REPORT for its simplicity, sorting, 
searching, and print options (like printing to disk). | also found 
that the typical “Girl Friday” won't scare as easily with PFS. 

| realized the potential for PFS after | practiced “printing to 
disk” and then reading the results with Apple Writer. Good ‘ol 
SOS allows APPLE WRITER /// to read DATA FILES, as well as 
ASCII FILES (PFS creates a DATA FILE, APPLE WRITER /// creates 
ASCII FILES). | studied Paul Lutus’ AUTOLETTER, RENUMBER, 
and many of the other routines, and | figured that if | could get 
the hard copy to look like the file ADDRS on Lutus’ disk then | 
would get the job done. What | ended up with, actually wasn't 
too close, but works great and can store more names than 
ADDRS, or Mail List Manager. 

| thought of the layout a couple of different ways. If | used 
Lutus’ subroutine for renumbering the address numbers, all of 
the addresses would have to be in memory to do so, limiting me 
to about 1000 names/addresses. So | decided to have the 
secretary enter the form numbers manually, as she enters the 
normal label & worry about misnumberings in the program. The 
first program | made was only 66 lines long, and did everything 
to satisfy the bank, but all information, that is the list of names, 
the formletter, and the program, all had to be on the same disk. 
Another problem was that the program didn’t know when to 
determine the end of the file, so consequently it just ran and ran 
at the end - you had to hit escape when you thought all the files 
had been printed. If your printer ate up the paper on the 300th 
address, you had to either rerun the whole set, or modify the 
beginning program counter. So on the second version | remedied 
all of the above, and added default file names for the last used list 
file and formletter file. This is it. 


Step One 
Create a pfs file with at least the following: 
FORM #: 


END: 
Somewhere in between there you might add: 


FORM #: 
COMPANY: 
MR*MRS*MS*DR: 
NAME: 
ADDRESS: 

CITY: 


ST: 
ZIP: 
END: 


Other fields may be included above or below this group as 
long as the field names aren't duplicated. 


Step Two 


The “FORM #:" field is used as a counter. When entering the 
labels, the FORM # will be incremented at the bottom of the 
screen by the PFS program. The person keying in, need only read 
the number & type it in. After the number, on the same line and 
without spacing add one character “>” for flagging and 
counting purposes. 

After keying in several records, print them to disk with the 
titles. You can practice printing to paper until they look 
something like this: 


FORM #: 33> (put a “>” next to the number] 
COMPANY: Citizens National Bank 

MR*MRS*MS*DR: Ms. 

NAME: Marilyn Wolfe 

ADDRESS: 10 \/ Elm 

CITY: Al 

STE 

ZIP: 

END: 


FORM #: 32> (put a “> next to the number] 
COMPANY: Wayne County Bank & Trust Company 
MR*MRS*MS*DR: Mr. 

NAME: John Reed 

ADDRESS: 215 SE Third Street 

CITY: Fair 

Soll, 

Zire 

END: 


FORM #: 31> 

COMPANY: Pike County Bank 
MR*MRS*MS*DR: Mr. 

NAME: Ike Elliott 

ADDRESS: 

CITY: Petburg 

ST: In. 

ZIP: 47455 

END: 


FORM #: 1> (put a “>” next to the number) 
COMPANY: Crawford Co. State Bank 

MR*MRS*MS*DR: Mr. 

NAME: Kent Boyd 

ADDRESS: 4 N. Side Square 

CITY: Robins 

ST: IL 

ZIP: 62345 

END: 


FORM #: 2> 
COMPANY: Union Bank 
MR*MRS*MS*DR: Mr. 
NAME: Thomas Wuench 
ADDRESS: P. O. Box 137 


put a “>” next to the number 


(put a “>” next to the number) 
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CITY: Lions 
ST: IN 
ZIP: 47345 
END: 


The little message under the name blank is really just another 
field without a colon to remind the secretary to put in the flag. 


Step Three 


Next we need to create a formletter, like this: 
April 1, 1966 


(FNAME) (LNAME) 
(COMPANY) 
(ADDRESS) 

(GIFY¥}:<(ST) (ZIP) 

Dear (TITLE) (LNAME), 

We at Sam’s lawn tractors are sure (COMPANY) can benefit 
from our latest in landscaping equipment. If you act quickly, 
(FNAME), you can get 10% off of any accessories you may need. 
\We would love to make a delivery to (ADDRESS) some time soon. 

Please call me personally (TITLE) (LNAME). 

Personally yours, 
Sam Paper 
ff 


Notice that all of the characters inside the parenthesis are 
capitalized. This is to match the format used in the program 
below. Also the “.ff’ is very important: it skips to the next page 
after printing. 


Step Four 


After that work is done the following WPL program can be 
DOne. 


PND 
NY 
oon 


F/$C/$D/A 


PSRHF 
ia ea##% SEARCHING FOR FORMH (X) 22%#% 


UM 

PSRCL 

PSRHF 

a ##%2% WORKING ON ADDRESS (2) OUT OF (X) SEARCHES ##4%% 


ENTER: 
sme FILE NAME of $C & HIT RETURN 


R 
ee NAME 1S $D 
a HIT aan TO ACCEPT-OTHERWISE TYPE THE CORRECT NAME 


OK 

PPR 

PIN 1S $C OK? YAN =$C 
PRT 

BEN 


PSX0 
PSYO 
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PPR HAVE YOU PRINTED TO DISK? YAN 


PSRHF 

PPR IF YOU WISH TO START WITH FORM #1 HIT RETURN 
PIN OR ENTER THE FORM # TO START WITH =$C 
PCS/$C// 

PGOENT 

PSX$C 


ENT 
LSCR3 


PLSSCR3&&(aNESA 

taki 

PSRCL 

ate list (PFS print filed=$C 


LOOP 
Fad (&dC& 
Y? 
PGOSETUP 
PGOTOTAL 


PSRSRC 

PCS/(2)/(Y)/ 

PGOQU 

LSAGFORM f: (X) &END san 
PCS/$C/SDKL/ 

PGOSTART 

SSCR 


NY 
LSCRANANE: &(&N 
SSCR2 


L$ 
PLSSCRENAME : &(&Ne$D 
PAS(NAME )=$C 

PSRF 


D 
PLSSCR28 WANNESD 
PAS(LNANE )=$C 


PLSSCRENAME: & &NE$D 
PAS ( FNAME )=$C 


PSRFD 
PLSSCRONS#DR: &(&NE$D 
cc 


PSRFD 

PLSSCR&ECOMPANY : &(&Ne$D 
PAS( COMPANY )=$C 

PSRFD 


PLSSCR&ADDRESS: &(&NE$D 
PAS (ADDRESS) =8C 


PSRFD 

PLSSCR&CITY: &(&N=$D 
PAS(CITY)=8C 

PSRFD 

PLSSCR&ST: &(&e$D 
PAS(ST)=$C 

PSRFD 

PLSSCR&ZIP: &(&N=$) 
PAS(2IP)=8C 

PSRFD 

PNP 
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NY 
PGO START 

au 

PSR CL 

PPR 

PPR QUIT AFTER <Y) FORMS 
PPR 


PPR ##%% THAT’S ALL FOLKS #222 
PPR COPYRIGHT 1984 - ON THREE 


PPR 
PPR HIT RETURN TO EXIT 


PIN =8C 
POT 


Program Description 


PND = NO DISPLAY 
NY = NEW? YES 
PGOBGN = GOTO FLAG “BGN"” (BEGINNING) 


BGN Routine 

PS XYZ = SET NUMERIC VARIABLES TO ZERO 

PPR = PRINT 

(| IMBEDDED A CONTROL-G JUST BEFORE THE FIRST CHAR- 
ACTER OF THE QUESTION) 

PSRHF = GOSUB TO FLAG “HF” 


Subroutine HF 

PRINT HALF A SCREEN OF BLANK LINES (VPOS 12) 

PRT = RETURN FROM SUBROUTINE (GO BACK TO BGN 
WHERE LEFT OFF) 


BGN Continued 

PIN=SC = INPUT’ ”’:CS$ ; PAUSE AND ACCEPT RESPONSE FROM 
USER & STORE AS $C 

PCS = COMPARE STRINGS; IF SC = “Y” THEN GOTO “F’”’ 
PGOOU = IF NEITHER “Y” OR “y’”” THEN GOTO OU (QUIT) 


F Routine 

.UT! 

PSRCL = GOSUB TO “CL” CLEARS SCREEN WITH CONTROL- 
(BACK-SLASH} 

.UT(BACK-SLASH} 

PSRHF = VPOS 12 

QUESTION = THIS IS IN CASE YOUR PAPER GOT EATEN THE 
FIRST TIME THRU & YOU NEED TO START WITH THE 34TH 
ADDRESS OR SOMETHING 

PCS/SC// = IF $C = NOTHING (“") THEN GOTO “ENT” 
PSX$SC = X = VAL(SC); STORE STRING $C IN NUMERIC 
VARIABLE X; ALPHA=O 


ENT Routine 

LSCR3 = LOAD FILE NAME “’SCR3” AT THE CURSOR POSITION 
IN TEXT 

PLSSCR3&&(&N=SA = LOAD STRING FROM FILE SCR3, START 
AT THE FIRST OCCURRENCE OF NOTHING “&&” AND STOP 
AT THE FIRST CARRIAGE RETURN “&(&’, NOT INCLUDING 
THE BEGINNING AND ENDING MARKERS (NOTHING & 
RETURN); STORE AS SA: SCR3 FILE HOLDS THE LAST USED FILE 
NAMES FOR THE PFS PRINT FILE & THE FORMLETTER FILE; SA= 
PFS PRINT FILE NAME (ADDRESSES) 

PLSSCR3&(&(&N=$B = SAME AS ABOVE BUT START AT THE 
FIRST CARRIAGE RETURN AND LOAD TO THE SECOND 
CARRIAGE RETURN AND STOREAS SB: SB = FORMLETTER FILE 
NAME 


PFS Routine 
PSRCL = GOSUB “CL”; CLEAR SCREEN 
PASmailing list (PFS print fileJ=SC = ASSIGN STRING; LET $C = 


PSRENT2 = GOSUB “ENT2” 


Subroutine ENT2 
PSRLN = GOSUB “LN”; DRAW LINE 
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PPR FILE NAME OF SC & HIT RETURN = THE VARIABLE SC W/ILL 
BE PRINTED TO THE SCREEN; CONCATENATE THE STRING 
MESSAGE 

PSRLN = DRAW LINE ROUTINE 

PRT = RETURN TO PFS ROUTINE WHERE LEFT OFF 


PFS Routine Continued 

PASSA=SD = ASSIGN STRING; COPY SA TO SD; SET DEFAULT 
FILE NAME 

PSRDF = GOSUB DF 


DF Subroutine 

PPRFILE NAME IS SD = PRINT DEFAULT FILE NAME 
PIN SC = INPUT NEW VALUE OR NOTHING 

PRT = RETURN TO PFS ROUTINE WHERE LEFT OFF 


PFS Routine Continued 

PASSC=SA = WHATEVER SC IS STORE IT IN SA; COULD BE 
NULL; COULD BE FULL 

PCS/SC// = IF $C = NOTHING THEN... 

PASSD=SA =...PUTSD IN THE VARIABLE SA INSTEAD OF $C; SD 


= DEFAULT 
PASSA=SC = NOW PUT THE RIGHT FILE NAME INTO $C 
PSROK = GOSUB OK 
OK Subroutine 


INPUT AR OV IN POR 

RETURN TO PFS WHERE LEFT OFF 

PFS Routine Continued 

PCS/SC/N/ = IF SC = “N” OR “n” THEN GOTO PFS 

B= GOTO THE BEGINNING OF THE FILE IN THE TEXT BUFFER 
(SCR3) 

F&SD&SAE& = FIND $D (DEFAULT FILE NAME) REPLACE WITH 
SA (LATEST NAME) 

Y? = JUST THE FIRST OCCURENCE, THANK YOU 


AW Routine 
This is the same as the pfs routine except for the formletter file 
name. 
SSCR3 = SAVE THE TEXT BUFFER AS SCR3 IN DEFAULT 
VOLUME; LATEST FILE NAMES 
NY = CLEAR TEXT BUFFER 
PSRCL = CLEAR SCREEN 

This next section will count how many labels are in the print 
file; This requires that the file be small enough to be loaded 
entirely into memory, ie. less than 1100 names. This section could 
be replaced with a simple “PIN” requesting the number of labels 
manually, if there are around 1000 labels (PFS will display the 
final count after printing to disk). 


LSA = LOAD THE LABELS FILE INTO THE TEXT BUFFER 

B = GOTO BEGINNING 

LOOP = MARKER; FLAG 

F&>(&>(& = FIND FIRST OCCURENCE OF “>",CARRIAGE 
RETURN; REPLACE WITH SAME 

Y? = JUST ONE 

PGOSETUP = IF FOUND, GOTO SETUP 

SETUP = MARKER 

PSY+1 = INCREMENT Y BY 1 

PGO LOOP = GOTO LOOP MARKER & DO IT AGAIN UNTIL 
END; GOTO TOTAL 

TOTAL = MARKER; Y = NUMBER OF LABELS 

NY = NEW? YES; CLEAR TEXT BUFFER 


START Routine | 
PSX+1 = INCREMENT X BY 1 
PSRSRC = GOSUB SRC 
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SRC Subroutine 

CLEAR SCREEN 

VPOS 12 

PRINT RECORD COUNT 

RETURN TO WHERE LEFT OFF IN START ROUTINE 


START Routine Continued 

PCS/A(Z)/[Y)/ = IF Z = ¥... 

PGOOU = ... THEN QUIT; Z = NUMBER OF LABELS READ, Y = 
NUMBER TO BE READ LSA&FORM #: (X)>&END:&N = LOAD 
FROM LABELS FILE, START AT “FORM #: (X)>" & STOP AT 
“END:”; DON’T INCLUDE BEGINNING & ENDING MARKERS; 
STORE IN CLEAR TEXT BUFFER; EQUAL TO ONE MAILING 
LABEL 


If the markers aren’t found, the next line will be skipped and 
PGOSTART will be read. This is necessary in case the user has 
requested a partial set of labels; just in case the forms don't 
increment normally; skip to next form number. 


PGOSTART = INCREMENT X AGAIN & SEARCH FOR NEXT 
LABEL 

SSCR = SAVE SCR; SAVE THIS LABEL AS A SCRATCH FILE; 
DIVIDE & CONQUER; GET READY TO FIND PARTS OF 
NAME/ADDRESS 

NY = NEW/? YES 

LSCR&NAME: &(&N = LOAD FROM FILE SCR, START AT 
“NAME: *“’ AND STOP AT FIRST CARRIAGE RETURN, DON'T 
INCLUDE THE MARKERS; LOAD JUST THE FIRST NAME INTO 
CLEAR TEXT BUFFER 

SSCR2 = SAVE JUST THE NAME AS A SECOND SCRATCH FILE; 
GET READY TO LOAD FIRST NAME OR LAST NAME 

NY = NEW? YES 

PSZ+1= INCREMENT Z BY 1; Z= NUMBER OF LABELS READ SO 
FAR 

PSRNUM = GOSUB NUM 


NUM Subroutine 

CLEAR SCREEN 

VPOS 12 

PRINT CURRENT STATUS FOR USER; IT REALLY IS WORKING 
RETURN 


START Routine Continued 

LSB = LOAD FORM LETTER FILE 

PLSSCR&NAME: &(&N=SD = LOAD THE NAME AGAIN; THIS 
TIME STORE IN A VARIABLE SD 

PAS(NAME)=SC = ASSIGN STRING; LET SC = “(NAME)” 

PSRFD = GOSUB FD 


FD Subroutine 

GOTO BEGINNING OF TEXT BUFFER (FORMLETTER} 

FIND $C ((NAME)}) AND REPLACE WITH $D (NAME) IN ALL 
OCCASIONS FOUND 

P= NOTHING; USED IN CASE $C IS NOT FOUND OTHERWISE 
PRT W/OULD BE SKIPPED 

RETURN TO ROUTINE 


START Routine Continued 

PLSSCR2# #%#N=SD = LOAD FROM SCR2 FILE (JUST THE 
NAME}, START AT THE FIRST SPACE, STOP AT THE FIRST 
CARRIAGE RETURN AND STORE AS $D; LOAD LAST NAME 
PAS(LNAME)=SC = LET $C = “(LNAME)” 

PSRFD = FIND ALL (LNAME) STRINGS AND REPLACE WITH 
LAST NAME 

PLSSCR&NAME: & &N=$D = LOAD FROM “‘NAME: * TO “ “; 
LOAD FIRST NAME 

FIND & REPLACE FIRST NAME 
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PLSSCR&MS*DR: &(&N=SD = LOAD FROM “MS*DR: *” TO 
CARRIAGE RETURN; LOAD TITLE 

FIND & REPLACE TITLE 

CONTINUE LOADING, SEARCHING & REPLACING THE 
COMPANY NAME, ADDRESS, CITY, STATE, & ZIP CODE 

PNP = NOW PRINT; MAKE A HARD COPY TO DEFAULT 
DEVICE 

NY = NEW/? YES 

PGO START = NEXT LETTER PLEASE 


QU Subroutine 

CLEAR SCREEN 

DISPLAY NUMBER OF LETTERS PRINTED 
POT = QUIT; END 


A couple of final notes: 


If you modify the program don’t add unnecessary spaces or 
characters in general. \/PL file sizes must be smaller than 2049 
characters. If your program does go over the limit, just chain from 
one to another. You can do this by having part 1 of your \W/PL 
program DO part 2. 

If you wish to have PFS sort the forms by zip code and print in 
that order, the limit of labels per file is around 1000 because the 
RENUMBER program must be used. The RENUMBER program 
ison the master Apple Writer /// disk. It will load the entire file 
into memory, search for each “<>”, and replace with “<(X)>". 
This will mean typing in <>, in the form number field instead of 
the actual number. 

This same program will work for VERSAFORM, and other 
data base programs as they become available. | have also used 
this similar idea for DIF files pulled from DB MASTER on the 
APPLE ][! 77 


Continued from page 24. 


Rest_Eny (MATH ENV) 
END; { Calculate } 


© initialization required } 
END. { Of UNIT PASCALCULATOR } 


PASCALCULATOR: Prog. Listing #2 


PROGRAM TEST CALC; 


WETTITIELictiliitirictitirccrrrcrterterererrerettrrertrrertrrtre ett t trey 
tne % 
PASCALCULATOR: Pascal Test Program | Copyright 1984 by | # 
fe (S8esceesrr ess 1 ON THREE 1% 
by Al Evans | Volume 2, #1 =| % 


x 

% 

% This Pascal program tests out the Pascal UNIT that enables your 
* programs to use a calculator from within a program. Thus, you 
: don’t have to boot a Basic or VisiCalc disk to perform a simple 
x 
oY 


“en 
= 


calculation. 


tn i te ate ate hate fate ate ate ate ate! 


} 
} 
} 
} 
} 
} 
} 
} 
} 
See the article for complete instructions on using this progran. } 
} 
} 


% 
% 
# 
& 
% 
# 
% 
% 


ECETTIC III CLES EC litre ti ler reserrerreerreresetterttertrrreresereterte | 


USES REALMODES, TRANSCEND 
{$USING TESTCALC.LIB} PASCALCULATOR; 


VAR IN_EXP: STRING; 
RESULT: REAL: 
RESULT STATUS: INTEGER; 


BEGIN 
WRITE (CHR (28)): 
WRITE. (Expression: ’): 
WHILE (IN EXP <> 7”) DO 
BEGIN 


Calculate (IN EXP, RESULT, RESULT STATUS): 
IF (RESULT STATUS ’= 0) TH ene 
= HRITELN TResult = ’, RESULT:10:5,’ (’, RESULT,’)’) 


Error Message (RESULT_STATUS) ; 
WRITE ¢ epee “); READLN UIN_EXP) 
END { WHILE JN EXP <) ’” } ~ 
END. { Of PROGRAM TEST CALC } 


{ Clear Viewport ) 
READLN (IN_EXP); : 
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by Kevin Everett FitzMaurice 


ome of the material in this article has already been published 
by “Apple Orchard” August 83’, but enough is unique 
that | thought the readers of ON THREE might like it. 


USERS VS. HACKERS 


The origins of things usually tend to determine their future 
development as well as their audience. It is similar to the effect 
that a first impression often has of coloring all further experi- 
ences of the object or person in question. Microcomputers have 
no special protection from these human means of perception 
and understanding. 

When microcomputers were first introduced in kit form, it was 
up to the hobbyist to determine a lot of the necessary activities in 
order to actually get the computer up and running. As time went 
on there appeared to be good money in providing these 
hobbyists with better kits, and even software, particularly the 
operating system software. In fact, interest seemed to be so 
great that it wasn’t long before assembled kits were outselling 
do it yourself projects. With the advent of single board 
computers like the Apple Jf, things really began to blossom. 
Hobbyists, experimenters, programmers, students, and engi- 
neers were the primary consumers of microcomputers for all of 
these early years. We will call this original audience by the single 
name of hackers for convenience. 

Today microcomputers come in many forms, but they are still 
produced with the original audience in mind. Very recently it has 
become popular for everyone to talk about user friendliness. 
Software has always had children as part of its audience, 
because so much of it was and still is in the form of games. So it is 
not surprising to find that there is indeed user friendly software 
available. There are even microcomputers that are as simple to 
operate as an eight track cassette tape, if all you want to do is to 
run software. 

Even the newest microcomputers offer operating systems that 
only hackers can appreciate. An exception to this is the LISA 
from Apple. It has NO operating system (transparent) as far as 
the user is concerned. In fact, Apple has not even bothered to 
name this operating system! (How about L.OS. ‘LISA Operating 
System’, pronounced “‘Loss” - Ed.) LISA is the next logical step 
beyond the ///ina user friendly operating system , but does not 
allow the access to the hacker that SOS does. Only SOS is both 
user friendly, and available to the hacker. 

If you as a user want to operate the computer itself, then you 
must either become a hacker, or buy programs that are designed 
to make your operating system user oriented. DOS 3.3, PC-DOS, 
CP/M, TRS-DOS, Unix (Xenix), CP/M-86, MSDOS, and even 
UCSD Pascal are all written with the hacker and not the user in 
mind. 

Many books have and will be published trying to make the 
operation of microcomputers with these operating systems 
possible for the general public (users). There are programs to 
teach CP/M, and other programs that attempt to make it user 
friendly. Two notable attempts to make CP/M user friendly are 
CP+ from Taurus Software, and Supervyz from Epic Computer 
Corporation. These attempts to make CP/M usable for the 
general public are quite valid. 


What is even better than converting CP/M's cryptic com- 
mands into english like commands ? NO commands at all! 


THE SOS OPERATING SYSTEM 


Apple computer developed a revolutionary operating system 
for the Apple /// and named it Sophisticated Operating 
System. The acronym winds up being SOS, pronounced 
“sauce”. And for the first time we really do have HELP as this is 
the first operating system ever designed to be user friendly. The 
user need not understand SOS to use it. All the operations that a 
user may need, like formatting new disks or copying old ones 
can be found on the SOS Utilities disk. Not only are all the 
functions of the Utility disk menu driven, but they are cursor 
driven as well! Instead of commands, a user need only position 
the cursor with the arrow keys, and press the RETURN key. 
\When it comes time for the user to enter information like file 
names, the system will prompt them for it, and even put likely 
names in place for them. 

If you can’t remember file names it is possible to look them up 
using the up arrow key. Help is available from the menus by 
pressing the Open Apple key and the question mark key. If you 
want to copy or destroy only certain files from a list, (subdirectory 
for example) you can choose which ones from the list with the up 
arrow. Any possible destruction of data will require confirma- 
tion, allowing you to easily change your mind or catch your error. 
Most operations can be aborted and menus quit by pressing the 
ESCAPE key. This is the easiest menu system | have ever Used. 

The revolution that SOS brings us continues far beyond the 
elimination of commands. New products for other microcom- 
puters are just beginning to incorporate file sharing among 
different functions. There is talk of forming file standards to 
enable program file sharing. All this is good, but still way behind 
SOS. With SOS, ALL programs that work under SOS can share 
files. (l recommend that you do not buy any programs from 
outside suppliers that do not work under SOS.) This is a minor — 
revolution in itself, because it allows the user to make full use of 
any one software package. 

For example, there is no better program than a word 
processor for editing. Older systems have never allowed file 
sharing, and thus have forced people to severely limit the 
usefulness of their word processor. The editing functions of 
BASIC and UCSD Pascal are quite primitive. But with SOS and 
Apple Writer ///, you can edit any language including Assem- 
bler, Pascal, and BASIC. You can even use Apple Writer /// with 
your Visicalc ///, and Quick File /// programs. File sharing also 
allows the exchange of data between programs and languages. 
| have not yet found any limits to this truly advanced ability of 
SOS. 

SOS also offers quite a number of other features that make it 
easier to use for the hacker as well. All management of memory 
and |/O locations and functions are handled by SOS for you. 
Another first for SOS is the ability to rewrite software drivers 
when changing peripherals, rather than having to change 
expensive hardware interfaces. You don’t have to specify which 
drive a file is in, as SOS will find it for you. Also SOS, by having a 
built-in hierarchal file structure, is the first operating system to 
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offer any data base capabilities. You don’t have to remember 
which slot a card is in, because SOS will. 

Files are automatically recorded with the date and time of 
creation, and the date and time of the last update. SOS can 
efficiently handle up to a 32-MEG hard disk. The first operating 
system from a major microcomputer manufacturer to offer user 
or device generated interrupts is also SOS. You can have up to 
eight volumes open at the same time. Pascal can communicate 
directly with SOS. In fact, you can use your System Utilities in 
place of the Pascal Filer. Storage of information is more efficient, 
because unlike DOS 3.3, SOS uses all available space on a disk. 
Programs that request printing can continue to run while the 
printing goes on. SOS is also unique because it is the first 
microcomputer operating system designed after the mainframe 
principles of Drivers. The Drivers (control software) for graphics 
and the console are a source of new power and convenience for 
the microcomputer. 

There is much more to tell about SOS, and you can count on 
hearing more about it in ON THREE. However, for now | 
would like to reintroduce you to the entire Apple ///. The Apple 
/// was the first to offer the speed and memory ability of 16-bit 
chips using an 8-bit chip (6502B). When the Apple /// originally 
came out, it also offered the most built-in expansion ports of any 
microcomputer (still has more than most). Other firsts are: first 
major microcomputer with Winchester-type memory from its 
own company, and first to use 64K-byte memory chips. 


FIRST OF THE RAM MACHINES 


The Apple /// also offers distinct revolutionary advantages 
because it is the first RAM based machine. For example, the 
updating or changing of any language or operating system is as 
easy as loading a different disk. These changes then reside in 
RAM, as opposed to on diskette, like the slow disk based 
machines (some portables for example). Already this has enabled 
Apple to update the operating system, Business BASIC, and 
Pascal /// as bugs were found. This encourages Apple, or any 
company who copies this idea, to continually improve their 
products. 

A RAM based machine will need a lot of RAM, and the Apple 
/// has a lot. An Apple /// with 256K RAM and a minimum 
number of drivers, can offer 205K to Business BASIC (and other!) 
programs. Try that on some other micros and no matter how 
much memory you put in their machine the operating system just 
can't handle it. Actually the Apple /// can handle 512K RAM, 
and if we ever use up all of its 256K RAM, Apple can double it (on 
board of course, and probably using the new 256K memory 
chips). 

There is no more ROM than is needed for diagnostics and 
booting the disk (4K). This means you are not ever going to get 
stuck with an outdated language or system in ROM, nor will you 
have to work around one. Who can predict what languages we 
will use in the future? Who cares? Our adaptable Apple /// is 
ready for them now! Hopefully we will someday soon have a 
language for users now that we have a micro for users. 


KEYBOARD 


Another major concern for users is the keyboard. Typing is 
always a trying experience for novices. Unlike the Apple ][, and 
even some new systems, the keyboard on the Apple /// comes 
in the traditional keyboard layout. What is even more important 
about the Apple /// keyboard is that it is completely software 
definable under program control at any time. This allows 
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multitudes of special function and help keys, and easy graphic 
manipulations. Two extra control keys, unique to the Apple /// 
(now the //e has them), allow the further redefinition of the 
other keys for any purpose. You get a total of 73 keys including 
fast numeric input ability with the numeric keypad. 

What | find most revolutionary about the Apple /// keyboard 
is that using the SOS Utilities disk, it can be reconfigured into the 
The Dvorak American Simplified Keyboard. The Dvorak 
keyboard was designed for people, speed, and simplicity. The 
OWERTY (traditional) keyboard was designed for primitive 
mechanical machines above all other considerations. The keys 
that were pressed the most had to be kept apart on the 
keyboard to slow down the typing speed so the keys wouldn't 
jam. New users should not be forced into the insanity of the 
OWERTY keyboard by not being able to change it. 

There are Dvorak keyboards available on typewriters from 
Smith-Corona and IBM, so you don’t have to worry about not 
being able to use typewriters. Once you configure the keyboard 
to the superior Dvorak arrangement, it will work with all Apple 
/// software that runs under SOS. You can even use the Dvorak 
with your communications software, such as Access ///. 

What makes the Dvorak so unique on the Apple /// is that it is 
loaded from disk every time you start the system, not installed in 
hardware. If you share your system with a diehard QWERTY 
user, it is easy to have two copies of the same program(s); one 
configured for the Dvorak and one configured for the OWERTY. 
The built-in flexibility of the Apple /// makes it truly revolu- 
tionary! 


EMULATION 


Apple was also the first company to offer the chance to 
upgrade from their old model to their new one while still 
retaining your old software. Granted the first Apple J][ Emulation 
disk could not run many programs, but it was a Start in the right 
direction. The new Apple ][ Emulation mode is really quite good 
at running the /// like an Apple ][ or ][+. When the next and 
perhaps final Apple ][ Emulation (//e Emulation?) program | 
comes out it should be able to emulate a souped up Apple II. 

If you are thinking about upgrading, then you should know 
what the /// will run. Let it suffice you to know for now, that if a 
non-game program will run on an Apple J[+ with 48K and DOS 
3.3, it will run on your Apple /// whether it is in Integer BASIC, 
Applesoft, or 6502 Assembly. This covers thousands of the 
programs available to the serious user. 

You game afficionados however are in trouble. It is quite 
possible to play games on an Apple /// of course, but problems 
arise with those that use or can use joysticks. The keyboard is 
presently the only way to use Apple ][ games, and games that 
have a joystick option often won't even load. Cursor /// 
joysticks on the Apple ///, so far, only work in Apple /// mode. 
Our basic rule is, if it is meant for keyboard use it will run on the 
///. But as you all know from reading ON THREE you can add 
a card from Micro-Sci that will completely correct this and 
allow all Apple ][ game programs to work in Emulation mode. 


BUILT-IN HARDWARE 


And now a list of the built-in features of the Apple ///. 


INTEGRATED FEATURES. 
1) An Internal 143K Disk drive. 
2) Interface for up to FOUR disk drives. 
(The THREE external drives can hold up to 572K) 
3) B/W Text Mode: Full 80 columns by 24 lines. 
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4) Color Text Mode: 16 colors with 40 columns by 24 lines. 

5) RGB or any video device, NTSC, and RCA phono monitor 
ports. 

6) RS-232-C port standard. 

7) Color Graphics. Full 16 colors with 192 lines of 280 dots per 
line. 

8) B/W Hi-resolution Graphics. 192 lines of 560 dots per line. 

9) Audio output. 64 volume settings and over seven octaves. 

10) Real time clock. 

11) Two Joystick ports, A & B. Silentype printer can share portA. 

12) Diagnostics in ROM. Automatic booting of disk at power on. 

13) Built-in security mount to prevent theft. 

14) 512K RAM ability. 

15) Four expansion slots. 


KEYBOARD FEATURES. 
1) Dvorak Keyboard layout available on file. 
2) STRICTLY traditional typewriter layout standard. 
3) 73 keys total. 
4) Sculptured, tiered, and angled keys. 
5) Two system keys. Closed and Open Apple keys redefine 
others. 
6) Dedicated cursor keys. 
7) 13 KEY Numeric key pad. 
8) Numeric keypad can be redefined into 13 special function 
keys. 
9) Alpha lock key. Shift locks alphabetical keys only. 
10) Two keys to cold boot a disk without powering on and off. 
11) Up to 13 control keys. 
12) Completely software definable character set. 
13) All symbols used by programming languages are available. 
14) Two speed automatic repeat for all keys. 
15) Total of 224 printable characters. 
16) Little bumps on D, K, and 5 keys for home positioning. 
17) 128 byte type-ahead buffer. 
18) Many different fonts available. 
19) Character set can be changed under program control at any 
time. 


SUPPORTED EXPANSION PRODUCTS. 
1) Universal parallel interface card 
2) Monitor ///, 16 shades of green, full graphics (RCA phono 
port). 
3) Silentype inexpensive printer plugs in port A. 
4) CP/M adapter made by Microsoft. 
5) Profile 5-MEG super quiet hard disk drive. Fits under 
monitor. 
6) Qume Sprint 5 letter quality printer (plugs into RS-232-C). 
7) Cursor /// joysticks plug into ports A and B. 
8) Modem eliminator comes with /// for use of RS-232-C with 
printers. 
9) Prototyping board for development of new boards. 
10) Most Apple J[ expansion boards with an Apple /// driver. 


FINAL NOTE 


Apple seems to be alone in the realization that with every 
passing day there are more users of microcomputers than 
hackers. (Others are aware - Ed.) It should be obvious that the 
percentage of owners who are hackers will continue. to drop 
dramatically until hackers are all but forgotten. This being the 
case, when it is determined what is revolutionary, it can no 
longer be based on what the hacker appreciates as. revolu- 
tionary, but what is revolutionary for the user. 

You may have read in magazines that IBM has introduced a 
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revolutionary microcomputer. Unfortunately, because of micro- 
computer's origins, most editors of computer magazines are 
entrenched hackers surrounded by hackers, and conditioned to 
evaluate products from the hackers viewpoint. To the user it 
makes no difference if the microprocessor has a superior 
instruction set. What matters to the user is how much memory 
can actually be used. Even speed is not a factor the user is ever 
likely to need worry about. | have yet to see a slow system from 
the user’s viewpoint (Diskette based systems are slow!). Profes- 
sionals who need a lot of scientific number crunching or time 
sharing need to worry about speed. And if they do, they will find 
that there are faster 8-bit systems out there than some new 
16-bit systems. 

This so-called revolutionary system offers the user an 
unfriendly primitive hacker’s operating system, no more than 
64K in BASIC regardless of how much memory you put in, NO 
built-in ports, even color is not built-in, nor are graphics built-in, 
it has less expansion room than much older systems, continues 
with all the old ROM problems, offers little speed improvement if 
any, has a noisy fan, has a noisy keyboard, takes up a lot of desk 
space, has a base of only four colors in high resolution, and 
comes locked into anon standard keyboard (both shift keys and 
the return key are out of place). And if that wasn’t enough, | also 
hear complaints it has at least one bug in its BASIC, and needs 
two separate monitors (one for graphics and one for text), but 
can’t run two. If the Apple /// doesn’t win over this name brand 
throwback, then we might as well hand the Japanese the 
market. 

A real challenger to the Apple /// is the Grid Compass 
computer. This system has some true technological advances, 
like 256K bubble memory, a real 16-bit chip (8086), an 8087 
arithmetic processor, an 8089 I/O processor, built-in 300/1200 
baud modem, and a built-in flat screen display all in a neat little 
package. However it also has such flaws as a small 6” screen, a 
normal display of only 52 characters, no batteries, no color, no 
sound, only 57 keys, and an outrageous price ($9,000). But far 
more serious, and even a little terrifying, is that if Big Brother 
were to design a computer this would be it. Why ? Because this is 
a completely closed computer system. 

The company who makes it is the only source of programs, 
and there is no access to the insides of the computer except 
through a network run by the same company. Using this system, 
large companies now have the ability to completely control 
what is allowed to be done with a personal computer. If you use 
the Compass with the network as it is designed to be used, than 
these companies can monitor everything you do. They and only 
they can decide what programs you can get, and what 
information you are allowed to receive. If the Apple /// has a 
real enemy, a real opposite, than this is it. Someone better get 
TRON on this right away! After all the hero of the movie TRON 
used an Apple /// at home. Did you notice ? 

Why has the truly revolutionary Apple /// not been recog- 
nized as revolutionary? Because it has a super refined 8-bit chip 
instead of a “revolutionary” 16-bit chip. If the first microcomputer 
with a 16-bit chip is the hacker's only criterion for what is 
revolutionary, then hackers should be praising the TI-99/4A. 


Continued from page 41. 
an important plus for some kinds of work. And as a “report 
writer,” it can be extremely versatile. 

But chances are you're not in real estate. \W/hat about other 
uses? Well, maybe you’re writing a doctoral thesis. A little 
imagination in creating specialized fields is all you need to get 

Continued on page 20. 
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Automating Access J // by Ken Johnson 


ccess ///, Apple’s terminal emulation program for the Apple 

///, can provide you with an excellent means to communi- 
cate by phone with electronic bulletin boards and other 
computer systems. If you are considering Access /// for your 
electronic communication needs, you can explore the 
merits of the program yourself with your Apple dealer. If you are 
a relatively new user of Access /// or even if you have been using 
it for some time, this article will show you ways you can put it to 
work more effectively. 

Before we start, let’s look at just what form Access /// is in 
when you get it and what you have to do, or have someone do 
for you, to make it work. Version 1.1 is the latest revision, 
incidentally, and you should obtain this update from your dealer 
if you have the earlier version. | have heard that a version 2.0 is in 
the works, but as of this writing it has not yet been released. 
Access /// leads a double life, so to speak. It lives one life as a 
Business BASIC invokable module and the other as a 
Pascal executable code file. Both versions are assembly 
language code files and work exactly the same once you get 
them “configured” and up and running, but the method of 
doing this is different for BASIC than for Pascal. 

Apple gives you instructions and provides a rudimentary 
Business BASIC HELLO program that does little more than 
INVOKE and PERFORM the Access /// invokable module. It 
gets you going, but little else. They also tell you how to set up the 
Pascal version as SYSTEM.S¥ARTUP and get you going from 
Pascal. With a little imagination, and given an autodial modem 
such as the Hayes Smartmodem, you can automate such things 
as dialing up the system you are ‘“‘accessing” and perform a few 
other little useful chores along the way. Programmed automatic 
dialup of a distant computer by simply selecting it from a menu 
can avoid the embarrassment and expense of dialing wrong 
numbers and perhaps having a human rather than a computer 
answer. If you are calling long distance and want to take 
advantage of one of the services such as MCI or SPRINT to save 
money, automatic dialup can be even more of a convenience. 
The listings presented here are intended to provide a means of 
doing this and may spur your imagination to bigger and better 
things as well. We'll proceed on the assumption that Access /// 
is to be configured to a single-stage boot disk with the volume 
name /APPLCOM in line with the instructions provided in the 
manual. 

Let’s start with the BASIC version and try a little more exotic 
HELLO program than Apple's version. Program Listing #1 is 
our modified HELLO program. Before we jump into the listing, 
let's prepare our disk. Boot the System Utilities disk and formata 
blank disk. Don’t name the disk /APPLCOM just yet. The Access 
/// master disk has that volume name already, and the file 
transfer option of System Utilities will not transfer files between 
disk volumes if both disk volumes have the same name. Let the 
Utilities program assign its own default volume name for now. 
Transfer SOS.KERNEL, SOS.INTERP, TIMESET.INV, and 
TIMESET onto this disk from your Business BASIC master disk 
using the file transfer option. Now transfer SOS.DRIVER and 
ACCESS3.INV from your Access /// master disk, after which 
you can rename your disk volume /APPLCOM. This should give 
you a driver file consisting of the SILENTYPE, CONSOLE, 
and RS232 drivers. You can use the System Configuration 
Program option to replace SILENTYPE with your particular 


printer driver at this point, if you wish. Reboot with this disk and 
you should see the familiar Business BASIC ) prompt. Now enter 
Program Listing #1, save it as HELLO, and we are almost 
done. 

Now, let’s look at the program. Line 20 introduces something 
which may be new to you, the unpublished reserved variables 
DATES and TIMES. You might be thinking that since no values 
have been assigned to these variables yet, they should be blank 
Strings, right? Wrong! DATES and TIMES are reserved variables 
which return the date and time values current in the elusive 
Apple /// system clock. Even if you do not have the clock chip 
installed, you can set this clock, which is what we are about to 
do, and it will automatically date and time stamp any files you 
may be recording. Try entering ?7DATES and ?TIMES in immediate 
mode from BASIC sometime, after you have run the TIMESET 
program and set the date and time. Then, save a file to the disk 
and you will see how the file is date and time stamped to the 
date and time you set. A peculiar feature about DATES is that it 
displays the year first. | suppose there is a reason for this, but I’m 
not sure just what it is. 

On with our listing. If the current date is okay, execution 
proceeds to statement 50. A “N” or “n” entry will run the 
TIMESET program and let you set the system clock. We 
transferred TIMESET and TIMESET.INV from the Business BASIC 
master disk, remember? Some modifications to this copy of 
TIMESET are needed. To do this, load TIMESET and change line 
9999 of TIMESET to read: 

9999 TEXT:HOME:INVOKE:RUN’ HELLO” 

Then delete lines 60 and 179, unlock TIMESET, since it was 
transferred as a locked file, and save the modified version in its 
place. This modification runs your HELLO program again after 
you have set the date and time, clearing TIMESETINV from 
memory in the process. The other modifications delete line 60, 
which opens the audio driver, and line 179, which produces a 
cuckoo clock sound effect using the audio driver. The audio 
driver is not used by Access /// and is not really necessary to set 
the system clock either. Reducing the size of your driver file may 
be critical, particularly if you are using a 128K Apple ///, in order 
to avoid ‘OUT OF MEMORY’ errors when you go to INVOKE 
ACCESS3.INV. The .CONSOLE and RS232 drivers are the only 
essential ones to Access ///. A printer driver is a good one to 
have too, but not essential unless you want to use the printer as 
a recording file. 

The selection menu is easily expanded with a few simple rules. 
The “Enter Terminal Mode Without Dialing” and “Exit to BASIC’ 
options should probably be kept as the last two on the list as 
others are added. Extend the range of numbers in the IF 
Statement in line 120 and the statement list in line 130 
accordingly as more options are added to the menu. PRINT 
CHRS(30) in line 120, if you do not recognize it, is the console 
driver screen control code for CLEAR LINE. More on the use of 
these later. 

The string format shown for dialing the different systems is for 
the Hayes Smartmodem. The phone numbers just as you would 
dial them are placed in the string right after ATD. You could add 
automatic logon sequences, access codes for MCI, SPRINT, or 
other reduced rate long distance calling services, and timed 
automatic redials as well, if desired, with a little ingenuity. The 
Smartmodem will accept up to 40 characters in a single 
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command string. The GOTO 160 branch instruction is needed 
after each dial instruction on the list except the last. 

Line 160 PERFORMs ACCESS3 and branches execution back 
to the menu upon exiting from ACCESS3. The menu selection 
process will repeat itself as many times as you want until the 
“Exit to BASIC” option is selected from the menu. This option 
branches to line 170 where various housecleaning chores are 
performed. You are then put back into BASIC with a “clean 
Slate”. 

At this point, you should have a single-stage boot disk which 
will have about 50 blocks, depending on the size of your 
SOS.DRIVER file, available for recording files. Applewriter ///, or 
a similar word processing program which generates ASCII text 
files, can be used to create text files for later transmission by 
Access ///. These files can be placed on the /APPLCOM volume 
as space permits or kept on another disk in drive 2. 

Now that we have seen how to automate the BASIC version 
of Access ///, let’s look at how to do much the same thing with 
the Pascal version. ACCESS3.CODE is the same assembly 
language module in function as ACCESS3.INV, but is pre-linked 
instead to a small Pascal host program. It can be X)ecuted from 
Pascal Command Level or renamed SYSTEM.STARTUP to run 
automatically when booted. Setting up a bootable disk for Pascal 
is similar to BASIC, but the source of the files is different. 
SOS.KERNEL, SOS.INTERP, SYSTEM.PASCAL, and SYSTEM. 
MISCINFO are transferred from PASCALI. SOS.DRIVER and 
ACCESS3.CODE are transferred from the Access /// master 
disk. This can be done using either the System Utilities program 
or Pascal Filer. 

Pascal’s normal method of setting the system clock uses the 
D)ate option of the Pascal Filer. We'll do it a different way so that 
we can automate it from within our program, and in the process 
look at such things as SEGMENT PROCEDURES and the use 
of library UNITS. We'll also throw in an example of how to use 
UNITWRITE to pass screen control commands to the Apple 
///'s console driver. Program Listing # 2 is a procedure we'll 
call Set_Clock for checking and setting the system clock. It is a 
general purpose procedure that can be used with any Pascal 
program. Program Listing #3 is our STARTUP program, 
Access_Startup. The compiled code version of this listing should 
be saved to your Pascal configured /APPLCOM disk as SYSTEM. 
STARTUP. 

Set_Clock is written as aSEGMENT PROCEDURE. There is no 
need to keep it in memory after you have used it. It uses two 
built-in procedures which are part of the APPLESTUFF library 
unit, one called CLOCKINFO to read the clock and the other 
called SETTIME which sets the system clock. These procedures 
are covered in the Pascal manual. The APPLESTUFF unit must 
therefore be declared at the beginning of any host program 
using this procedure as we have done in Access_Startup. 
PROCEDURE Set_Clock contains a BOOLEAN FUNCTION, 
Clock_Set which returns the value TRUE once we are satisfied 
that the clock is set properly. The body of the PROCEDURE 
consists entirely of a WHILE loop which calls this FUNCTION 
and resets the clock as long as a value of FALSE is returned by the 
FUNCTION. 

Let’s look now at our Access_Startup program. The USES 
declaration tells the compiler which library units to link into the 
program. As we said, the APPLESTUFF unit is needed for the 
intrinsic PROCEDURES CLOCKINFO and SETTIME. The CHAIN- 
STUFF unit is also needed since we use its SETCHAIN 
PROCEDURE to execute ACCESS3.CODE within our program. 
Both units must be present ina file named SYSTEM.LIBRARY 
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on our program disk. Use the Pascal LIBRARY.CODE program 
found on PASCAL3 to create this SYSTEM.LIBRARY file on the 
/APPLCOM volume. SEGMENT PROCEDURE Set_Clock is 
inserted where the comment indicates. By definition, such 
procedures must precede any other executable code in the 
program. 

Next is a short PROCEDURE we'll call Home, since it does 
the same as HOME does in BASIC. It illustrates the use of 
UNITWRITE to pass control commands directly to the console 
driver. We've used UNITWRITE slightly differently further on, just 
to show that there is more than one way it can be done. These 
codes are found, incidentally in the Standard Device Driver's 
Manual under the section on the CONSOLE driver. 

Access_Startup is relatively simple and straightforward. The 
listing is documented to show each step. It uses a REPEAT loop 
to read in the menu selection, repeating the loop UNTIL the 
selection falls within the integer set 1..4 of the menu. The 
SOCHECIK- option is used here to disable Pascal’s automatic 
I/O checking and to prevent the program from terminating with 
an I/O Error upon entry of the wrong input type, a letter for 
example. To add to the options, simply add the additional 
selections to the menu and CASE statements and expand the 
range of the ‘selection’ set accordingly. Once a valid selection is 
entered, the program proceeds to the CASE statement that 
selects the proper string value for the string variable, dial. Dialing 
the number is simply a matter of writing the value of the variable, 
dial, out to the Smartmodem. The SETCHAIN procedure then 
actually exits this program, chaining execution of ACCESS3. 
CODE. 

Unlike the BASIC version, we do not return directly to 
Access_Startup after we exit from Access /// with the option of 
making another menu selection. We return instead to the Pascal 
command level. If the code file is named SYSTEM.STARTUP, you 
need enter only I)nitialize to re-run Access_Startup. This may 
seem somewhat more awkward than the way it is done from 
BASIC, and it is. To make it as convenient would require that 
ACCESS3.CODE be furnished as a library unit, linkable into a 
host program. Perhaps in future versions of Access /// it will be. 

Since both versions of Access /// work the same, why have 
two ? The BASIC version seems the more versatile of the two and 
leaves more roomon the /APPLCOM disk for other files. It is also 
much easier to modify the BASIC HELLO program than the 
Pascal SYSTEM.STARTUP program, since the Pascal program 
must be recompiled after each change. Does the Pascal version 
have any advantages over the BASIC version? | have found that 
the Pascal version actually offers a great deal more flexibility and 
convenience. The Pascal Editor and Pascal Filer are directly 
accessible from Pascal command level. The System Utilities 
program, itself a Pascal code file, can also be made easily 
accessible directly from Pascal command level without having to 
boot it separately. Here’s one way that can be done. 

Take a second formatted disk and name it /APPLCOM.D2. 
Transfer SYSTEM.FILER and SYSTEM.EDITOR to this disk from 
PASCALI. Then transfer the SYSTEM.STARTUP file from your 
System Utilities disk to /APPLCOM.D2, renaming it UTIL.CODE. 
(This procedure is explained in Appendix | of the Standard Device 
Drivers Manual.) Keep this disk in drive 2 when running the 
Pascal version of Access ///. Now you can enter the Editor or 
Filer just by selecting the Ej}ditor or F)iler option from Pascal 
command level. SOS will seek out and load the appropriate files 
from drive 2 automatically. You can also run the System Utilities 
program by X)ecuting .D2/UTIL from the Pascal command level. 
You can use all of its features, including formatting blank disks. 
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Just make sure that the FMTD driver is part of the SOS.DRIVER 
file on your boot disk, if you want to use the disk formatting 
option. This second disk has the additional benefit of providing 
more disk space for recording files, about 41 blocks in fact. Your 
single-stage Pascal boot disk for Access /// will only have about 
14 blocks left at this point. 

Having the Pascal Editor conveniently available makes it very 
easy to create text files for transmission by Access ///. Version 1.1 
of Access /// will transmit either Pascal or ASCII text files. The 
Apple /// Pascal Editor can generate either and has nearly all of 
the features of a dedicated word processing program. | have 
found it even better suited to generating text files for trans- 
mission to bulletin board systems than Applewriter ///. The 
Pascal Editor will automatically insert the carriage return at the 
end of each line. Most bulletin board systems seem to require 
this. 

As we said, Applewriter /// can be used to create ASCII text 
files for transmission by the BASIC version of Access ///. The 
System Utilities program can also be used in conjunction with 
the BASIC version. These require separate boots, however, a 
somewhat more awkward process. The convenience of having 
the Pascal Editor and Filer and System Utilities program so easily 
accessible from Pascal gives this version the edge in many 
applications. Both versions have their strengths and weak- 
nesses, but furnished in the form that they are, they comprise a 
powerful and remarkably versatile data communications system. 


Access ///: 
Program Listing #2 


SEGMENT PROCEDURE Set_Clock; { Only in memory when called } 


VAR a. : STRING [16]; { Input string for new clock setting } 
hewsetting +: STRING [18]; { Reconstructed string for SETTIME proces } 
day : STRING [1]; {Not CHAR since CONCAT requires STRING type } 


FUNCTION Clock_Set : BOOLEAN: 


VAR year, mon, daycount, dayofwk, hr, min, sec, thou : INTEGER; 
( Values returned by APPLESTUFF CLOCKINFO procedure } 


okay : CHAR: 
BEGIN { FUNCTION Clock _Set } 
CLOCKINFO (year, mon, daycount, dayofwk, hr, min, sec, thou); 
( APPLESTUFF procedure call reads the current clock setting } 
WRITELN; WRITELN (’System date and time are as follows:’): 


WRITE Oday eae { Break it down into readable form } 
CASE dayofwk OF 

1: WRITELN (‘Sunday’); 

2 : WRITELN (’Monday’): 

3: WRITELN (’Tuesday’}s 

4 : WRITELN (Wednesday: ); 

3: WRITELN (’Thursday’); 

6 : WRITELN C’Friday’) 

7: WRITELN (’Saturday’): 


END 
WRITELN (‘Date : ’ mon ‘/’, daycount, ’/’, year); 
WRITE (’Time 3’ Ar, 7)3 

eet (10) THEN (Make it easier to read } 


WRITE (’0’); 
WRITELN (min); 


ELSE 
WRITELN (min); { Write it as is } 
WRITELN 

WRITE (’Press (RETURN) if okay, No to change: ’); 

READLN (okay); 

IF (Cokay = ‘N’) OR (okay = ’n’)) THEN { Check both upper and lower case } 
ico i= FALSE. { We want to reset it } 


Clock Set := TRUE; { Current setting is okay ) 
END; { FUNCTION Clock Set } 


BEGIN { SEGMENT PROCEDURE Set Clock } 
WHILE (Clock_Set = FALSE) DD { Call FUNCTION Clock Set and test it } 
BEGIN { Reset the clock } 


day := “0: 

WRITE (“Enter the day as: Sunday = 1 ., Saturday = 7: ’); 

WHILE (day < 717) OR (day > “77)) DO READLN (day) § 

WRITE (“Enter date and time as MM/DD/YYYY HH:MM : ’); 

READLN ene 

newsetting := ONCAT (COPY (setting, 7, 4), COPY rt: Vy 2) 

COPY (setting, 4, 2), day, COPY (setting, 13, 4), 

COPY enh 15 23, 9d000’); 

SETTIME (newsetting); { APPLESTUFF procedure call ) 


END; ¢ WHIL 
END; ¢ SEGMENT PROCEDURE Set_Clock } 


Prog 


ram Listing #3 


PROGRAM Access Startup; 


{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
{ 
( 
{ 
{ 


SECELECILEtostreeeccecet ere eeeerececerectetererttrereetrttetrtrttteretes 
Btn enn rennnnnnnn 

* Automating Access ///: Pascal Version | Copyright 1984 by | # ) 
fo Sessecsenenases—nnersreneasaseeresor= 1 ON THREE 1#} 
* by Ken Johnson | Volume 2, M1 | : : 
¥% wee wmnmcemwwow ew woo woe 

* This program is a modified SYSTEM.STARTUP for the Pascal version ¥ } 
* of Access ///, It will autodial the numbers that you supply. : : 
x 

* Please read the accompanying article for complete information. # ; 
x 3 
IEEE IICO ECOL ELI Ctrl rel tere citer eee rece eeetrrerert reset retertetert eet. mm) 


USES CHAINSTUFF, APPLESTUFF; { Must be in SYSTEM.LIBRARY (or Program Lib.)} 


VAR selection, { Menu selection } 


{ 


code : INTEGER; { Screen control code variable } 
dial : STRING; { For telephone numbers } 
smartmodem : INTERACTIVE: 


INSERT SEGMENT PROCEDURE Set_Clock HERE } 


PROCEDURE Home; { Works same as HOME in BASIC } 
VAR code : INTEGER: 


BEGIN { Home } 


code := 28; { Clear Viewport ) 
UNITWRITE {1, code, 1); 


END; { Home } 


BEGIN { Access Startup ) 


Home; SetClock; { Set the system clock } 
RESET (smartmodem, ’.RS232’); { Open the modem as an INTERACTIVE file } 


Home ; 

GOTOXY (10, 5); { And print the menu to the screen } 
WRITELN (“Welcome to Access ///’); 

WRITELN; 

WRITELN (“Which system do you wish to contact?’); 

WRITELN; 


i] 
WRITELN (’ 1 - First Computer System’); 
WRITELN (7 2 - Second Computer System's; 
WRITELN (’ 3 - Enter Terminal Mode Without Dialing’); 
WRITELN (’ 4 - Exit to Pascal Command Level’); 
WRITELN; 
selection := 03 
sett { Until valid selection made } 
code := 31; 
GOTOXY (5,20); UNITWRITE (1, code, 1); { CLEAR TO END OF LINE } 
WRITE (’ Enter your selection: OF 
{$]OCHECK-)} { Disable automatic checking } 
READLN (selection); 
{$]OCHECK+} { Re-enable automatic checking ) 
UNTIL (selection IN [1..4]); { Expand set range when adding to menu } 
CASE selection OF 
: dial i= “ATD{First Computer System phone number)’ § 
: othe = “ATD{Second Computer System phone number}; 
: dal oe 7% 
: BEGIN = 


Home ; 
EXIT <PROGRAM) ; 
END; { Back to command level } 
END; { Of CASE } 
WRITELN (smartmodem, dial);  { Dial the nunber } 
SETCHAIN (” /APPLCOM/ACCESS3”) ; { Execute Access /// } 
CLOSE (smartmodem) { Never really executes, but good prooranming practice } 


awh, 


END. { Access Startup } 


Program Listing #1 


SO 08 OW OF & CORO © 


NSDMIT TEC L SCSI CSIC Lees rie ereerreretretrirerttteresrttetttttrrett tree’ 


BO tere enmeneeennn 3 
REM # Automating Access ///: Basic Version | Copyright 1984 BY | # 
REM & 0 ------------------------------------ 1 ON THREE /# 
REM # by Ken Johnson | Volume 2, #1 | 2 
REN Hoc Se es sy naitennconanaomenas x 


REN # This program is modified HELLO ore ram for the Basic version # 

REM * of Access ///, It will autodial the numbers that you nd A % 

REM # Please read the accompanying article for complete instructions. # 

NIECE TELELIIESITilIlececreseresetecrererertrtettrertrttrttttt ttt t tt 
TEXT : HOME 

PRINT"Date is: "3 DATES:PRINT’Time is: ": TIMES 

PRINT’Press (RETURN) if okay, No to change:";:GET ok$:]F INSTR<"Nn® ,ok$) 
THEN RUN" TIMESET® 

OPENM) ,°.RS232° 

as= PREF 1X$ : PREF IX$="" s INVOKE® /APPLCOM/ACCESS3. INV® 

HOME : HPOS=30 : INVERSE :PRINT® WELCOME TO ACCESS /// * :NORMAL 

VPOS=3:HPOS=22:PRINT "Which system do you wish to contact?® 

VPOS=6:HPOS=26:PRINT"S - First System 

VPOS=8 :HPOS=26:PRINT"2 - Second Systen® 


100 = VPOS=10 :HPOS=26:PRINT"3 - Enter Terminal Mode Without Dialing? 
110 = VPOS=12:HPOS=26:PRINT’4 - Exit to BASIC’ 
120 VPOS=15:HPOS=26:PRINT’Selection is: "::GET selection:PRINT selections :IF 


130 ON selection GOTO 140 


(selection<]) ia Tee a PRINT CHR$(30) :GOTO 120 
§ 


150 
140 PRINTHI°ATD<First System phone number )°:G0T0 160 
150 = PRINTHI"ATD<Second System phone number)° 
160 PERFORM ACCESS3:GOTO 40 
170 = PREF IX$=a$: JNVOKE : HOME :NEW: END 
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Slots of Fun by Ben McCaw 
206 =PRINT*A AAAAAA At 
Dear Sir: 207 = PRINT"A AAAA A* 
My name is Ben McCaw. | am 10 years old. | drew the pictures 208 =PRINT*A AR AY 
for the enclosed slot machine 207 PRINT A A 
program, that uses the Apple 40 PRINT" AAAAAAAAAAR 
/// window command to make the screen look like a real slot 911 RETURN 
machine. My father helped me with the programming. 300 PRINT* ’ 
Lines 10 to 64 are the heart of the program. They use two SUD ERIN Sere 
loops to print my faces at random in the five different windows. ane aU aaa 
Lines 100 to 670 are my faces for the slot machine. You could 304 PRINT? é 
have any faces that you want. Lines 900-1301 keep track of your 905 PRINT'sesss=s===" 
money and winnings. 306 PRINT" 
| would like to see the program printed in ON THREE and | fl St esieaoeee: 
think your readers will enjoy seeing how easy it is for a kid to 309 PRINT ‘sas==sa===° 
make neat graphics. 330 PRINT* 8 
311 RETURN 
Sincerely, 400 PRINT’BBBBBBBBBB* 
NS 
Ben McCaw 403 PRINT’B BBB 
404 PRINT" : 
—_ 3 is Be 
| think you're right and I’m sure our readers will like to see this 430 PRINT"E BB B® 
program. 440 PRINT"B BB B* 
. 450 PRINT'B BB B* 
Bob Consorti 460 PRINT’ BBBBBBBBBB" 
470 RETURN 
0 REM PRE REREAD Ran strep tesennn rene ee ee 500 = PRINT" CCCCCCCOLC™ 
SORES ee Cl t~—‘“‘ MC OR o0f  PRINT'C SS 
2 REM ¥ Slots Of Fun Copyright 1984 BY | : 302 PRINT'C SS C* 
3 REN * (Ben’s SUPER ‘slat Machine) | ON THREE | # J04 = PRINT*C = ite 
Q@ CREME asters aacsesertern ance ess Volume 2, Wi) | 505 PRINT'C § C° 
S REM * by Ben McCaw RSE e reer em ennns % 310 «=PRINT'C «6S 6? 
& REM HIER HEE TA EEE AERA EE 5270 PRINT'C 00 5S C° 
7? = 10.00:MeN-.25 360 = =PRINT*C 0G 00 C* 
8  TEXT:HOME WINDOW 30,2 T0 75,3:PRINT’Ben’s SUPER Slot Machine" 36]  PRINT*C 00 ¢* 
9 GOSUB 700 370 = PRINT*C c* 
j0 FOR T=1 TO? 380 = PRINT" CCCCCCCCEC" 
37 P=] 290 = - RETURN 
40 FOR l=] TQ 60 STEP 12 600  PRINT*6G6G666-0-6" 
45 WINDOW 1,9 TO 104) ,20 601 PRINT'GGG G66" 
50 R=INTCRND( 233 602 PRINT'GG =" 
a1 RCPI=INT(R/6) 41 603 PRINT'G OG Q 6° 
ve ON INT(R/6)43 GOSUE 100,200,300 ,400 ,500 , 400 604 PRINT*S ; 
ny P=P+ j 605  PRINT'S ge 
w NEXT ] 606 PRINTS & § S* 
we NEXT T 607 PRINT"S SS5SS §° 
36 ©6GOSUB 1000 660 =PRINT*S S* 
60 WINDOW 10,22 TO 30,24 663  PRINT*S $° 
] a PRESS RETURN 'T0 PLAY" :A$ 670 =PRINT"SSSSSSS59S°" 
i00 PRINT"a2agaaeeaa" 900 WINDOW 62,24 TO 79,24:PRINT"YOU HAVE $°s:PRINT USING HANH. AH? SM; 
{01 PRINT‘? é 901 RETURN 
102. PRINT"S O 0 S° i000 60 
103 RINT*S iy 1010 JF R¢1)=3 AND R(2)=3 AND RC3)=3 THEN W40:6070 1200 
104 PRINT'S 00 §° 1020 IF R(1)=3 AND R(Z)=3 THEN We5:G0T0 1200 
105  PRINT'S S° $100 «IF R¢J)=RC2) AND R&2)=RC3) THEN LE 16:G0T0 1200 
106 PRINT*S Ss" $110 TF R¢{J=RC2) THEN WE 2:G0TO 1200 
107 PRINT'SW = WS° $120) «JF R¢2)=3 AND R(3)=3 THEN W3:G0T0 1200 
108  PRINT’S Wadaw S" 1121 JF R¢3)=3 AND R¢4)=3 THEN W3:G0TC 1200 
109 + S* 1422. IF R¢4)=3 AND R(S)=3 THEN W3:60T0 1200 
110 PRINT’SSSSSSSSSS° 1130 JF R¢2)=RC3) OR RCSD=RC4) OR RC4D=RC5) THEN We! .50:G60T0 1200 
11 RN 1200 36 MeMtY 
200 PRINT"AAAAAAAAAA" 1205 IF Wi>0 THEN GOSUB 1300 
203 RINT"A A" 1206 IF Wi)0 THEN PRINT CHR$(7) 
202 ~=PRINT’A =I OAS 1207 GOSUB 900 
203 =PRINT'A AAAA AS 1210 RETURN 
204 ~=PRINT"A AAAAAA A’ 1300 WINDOW 63,22 TO 79,23: INVERSE :PRINT"YOU WON $° sW; :NORMAL 
205 PRINT"A AAAAAA A’ $301 RETURN 
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(Would You Believe || to the Max?) by atevans 


K, OK, | Know | said | would talk about making sounds on 
the Apple /// in this column. But that will have to wait 
until next month, because this month | found something you'll 


like better. 
One thing I've always found irritating about the Apple /// is 


the “Apple ][ Emulation Mode”. Not that it doesn’t emulate 
the Apple ][ — it does that very well in most respects — but 
after all, it IS an Apple ///. Surely there must be some way to 
take advantage of some of the more powerful features of the 
REAL machine without losing compatibility. 

In particular, it seems downright unfair that the emulation 
mode offers only upper-case letters. | haven’t had an Apple J| in 
years without a lower-case adapter. But there’s no place to put 
a lower-case adapter on the ///, or a shift-wire modification, or 
any of the other bits and pieces with which we old-timers 
“customized” our Apple J[’s. And besides, the Apple /// is 
already supposed to HAVE upper and lower case letters. Isn’t 
there some way we can get them into the emulation mode? 

As it turns out, there is. An intrepid explorer named George 
Oetzel has boldly ventured into the unknown depths of the 
Apple ][ Emulation disk. He has discovered emulation modes 
far beyond anything an Apple ][ ever dreamed of, and his series 
of articles in Softalk (June, July, and August, 1983) is well 
worth reading. However, we will content ourselves for now 
with a program which will convert an emulation disk to allow 
any Apple /// system character set to be used in the emulation 
mode in both upper and lower case. As an added attraction, 
you can choose either a flashing or a non-flashing cursor. 

There are several steps which must be taken. First, of 
course, a new Character set must be moved onto the emulation 
disk. The accompanying program begins by reading a standard 
Apple /// character set. Then it reads the appropriate track 
from the emulation disk which is to receive the new Apple J 
character set, moves the new character set into place, and 
writes the track back to the emulation disk. In itself, this would 
allow any Apple J[ program to display lower-case letters, but 
would not permit them to be typed in from the keyboard. 

The next step involves making a few short patches to the 
Apple ][ monitor program — to allow it to accept lower-case 
input and keep it from producing strange effects when the 
cursor is backed over a letter. Since the entire emulation mode, 
including the system monitor, loads into RAM on the Apple ///, 
this is much easier than altering the ROM monitor on a real 
Apple II 

The third step is to provide a new KEYIN routine for the 
monitor, one which takes the status of the SHIFT and ALPHA 
LOCK keys into account before deciding which character has 
been entered. George Oetzel has written such a routine, and 
all Apple /// owners should thank him for it. It is patched into a 
portion of the monitor originally used to read cassettes. Since 
the /// has no cassette port anyway, this will cause no 
problems. 

The program makes these changes in the same way as 
before, with one additional complication — two copies of the 
Apple ][ monitor exist on the emulation disk, at different offsets 
from the beginnings of their disk tracks. For this reason, the 
procedure which actually performs the patching (Make_ 


Patches) requires an OFFSET into the track buffer as a 
parameter. 

Finally, we have to change things so that Applesoft never 
tries to go into FLASH mode — since we now have lower-case 
letters, this will produce garbage on the screen. Again, the 
Applesoft language actually loads into RAM on the ///, so we 
can make these modifications directly on the disk image. 


How to use the program 


To use the accompanying A2ZPATCH program, you need 2 
pieces of information. First, you have to know the Pascal unit 
number of the disk drive in which you will place the emulation 
disk to be modified. This is necessary because the emulation 
disk has no directory, and can only be read and written by 
absolute block addresses. If you have a 2-drive system, the 
built-in drive is unit #4 and the second drive is unit #5. If you 
have a ProFile, things are somewhat more complex. The 
easiest way to be certain is to press “F” at the Pascal command 
line to get to the filer, then press ‘’V” for “volumes on line’. This 
command shows the Pascal unit numbers, device names, and, 
where applicable, the volume names for all devices configured 
into the system. 

The second piece of information you need is the pathname 
of the file containing the character set you wish to use. Any 
Standard Apple /// character set is acceptable. Several are 
available on the Apple Business Basic disk and the System 
Utilities DATA disk. More can be found on the Apple Writer /// 
Master disk. Or, you can design your own font using any of 
a number of available character set editors (including my 
/CHARSET/EDITOR). 

Of course, you also need a copy of your Apple J[ Emulation 
disk to modify. Place this copy in the drive you will use and 
execute the program. Enter the Pascal unit number for this 
drive when prompted. The program checks to verify that an 
emulation disk is in the specified drive. Now enter the 
pathname for your character set file. The program loads the 
character set, checks again to be sure the emulation disk is still 
present (and demands that you replace it if it’s not), then 
installs the character set and makes the required patches. The 
whole process takes about 5 seconds. 

Boot the Apple /// on your new emulation disk, then place 
any bootable DOS 3.3 disk in the built-in drive and press 
<RETURN-. It should be possible to enter and display caps 
and lower-case letters with no further ado. As mentioned 
above, the FLASH command in Applesoft no longer works. 
The reason is rather complicated, but basically it had to be 
removed to allow inverse lower-case. . 

If the effect you get is not what you expected, proofread the 
program text VERY carefully, particularly the procedures 
Set_Keyin_Patch, Make_Patches, and Patch_Applesoft. The 
numbers in these procedures all represent absolute locations 
and machine-language instructions. In that realm, there is no 
such thing as a “slight” mistake. 

Incidentally, this process has one side-effect | don’t under- 
stand. If, and only if, you issue a DOS “FP” or “INT” command, 
the cursor temporarily changes to a non-flashing inverse 
accent grave (ASCII character 96). It changes back to the 
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normal inverse or flashing space character when the next key 
is pressed. 


And onward... 


| can think of a couple of improvements to this program, and 
I'm sure you can think of more. For example, it’s irritating to 
have to refer to a disk drive by its Pascal unit number. 
Unfortunately, a SOS device name can be translated to a unit 
number only by means of a two-stage process involving a SOS 
call, and thus a linked-in assembly-language routine. For the 
sake of time and space, | left it out. Of course, a procedure to 
provide a catalog of any disk suspected of containing 
character-set files would also be useful. 

It would be nice to be able to access more of the Apple ///‘s 
features from emulation mode. As George Oetzel explains in 
the articles cited above, this is possible — to some extent. 
Changes can be made in the program which sets up the 
emulation mode, for example to make it possible to both read 
from and write to the RAM from $DOO0O to SFFFF, to switch the 
SCOOO-SCFFF address space between RAM and I/O, to 
introduce a color text mode, and to allow the clock to be read. 
But these changes become increasingly complicated and make 
the emulation mode increasingly unlike a real Apple ][ — and, 
hey, if you just want to PLAY with a computer, well the Apple 
/// is already the greatest toy there is! 

Back on amore reasonable level, you could change the NMI 
and RESET vectors in the monitor (at locations OFFSET + 762 
through OFFSET + 765) to point to location SFF59 (fill those 
locations with 89 255 89 255), relieving the application program 
of its control over what happens when you hit RESET. 

Or, for example, you could patch Applesoft so that it actually 
reads the Apple /// joystick when PDL(O) and PDL(1) are 
referenced. Since my joystick is in port B, Applesoft normally 
reads it as paddles 1 and 3, which means | have to change any 
program | want to use with it. You can patch Applesoft itself to 
jump from the routine that normally handles the PDL keyword 
to some part of the code which isn’t used (for example, the part 
of the language which processes STORE, an ancient keyword 
which had something to do with storing arrays on cassettes). 
Then insert a short routine at that location to change O to 1 and 
1 to 3 before JSR’ing to PREAD. Unfortunately, there’s nothing 
you can do about the fact that the two buttons on that joystick 
are still read as Apple ][ buttons 1 and 3 — and the Apple J[ 
doesn't even HAVE a button 3! 

And then some things are just impossible. For example, 
there’s apparently no way to fake the Apple /// into believing it 
has a language card. And my personal dream of an Apple J[ 
running INSIDE an Apple /// will apparently go unrealized. An, 
but what a computer THAT would make! 

Anyway, that’s it for this column. I'd like to call your attention 
to the fact that the patcher program has only one main 
procedure, Patch_Character_Set. Lots of logical space left for 
other interesting and/or useful alterations. Send them to me, 
and I'll include them in a future column. As | may have 
mentioned before, we've got to SHARE OUR KNOWLEDGE! 


PROGRAM A2PATCH; 
RERFFFELAAAASRKF FAR FARARARS ALARA RSAARALARAALSAR ALTA RAARAALAS AK KAAKALAAAF 


} 
# } 
# le J£ Patch | Copyright 1984 by | # } 
% a ereccencse= | ON 5 HREE | 2) 
% by Al Evans (with help from George Oetzel) | Volume 2, #1 | % ; 

} 
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This program will alter an Apple JE Emulation diskette so that # 


you can install any Apple /// character set, You can now also 
have upper AND lower case letters in Emulation mode ! 


eo OK OK 
et ke om oe 


{ } 
} 
{ RARRAAA AAA HHH HALA KAKA AA ALAR HK AA RA LAA AAAARA TTA SVAKRFLFRFSAKFSAAFIRIF 
TYPE Byte = 0..255; 

Block = PACKED ARRAY (0..511) OF Byte; 

Track = PACKED ARRAY [0..4095) OF Byte: 

SYS C_Set = PACKED ARRAY [0..1023) OF byte: 


VAR T BUF: Track; 
ERUL_UNIT: INTEGER; 


PROCEDURE Read Track (TRACK_NO: INTEGER); 
VAR START_BLOCK: INTEGER; 


BEGIN 

START BLOCK:= TRACK _NO # 83 

UNITREAD (EMUL UNIT, T_buF, SIZEOF (T_BUF), START BLOCK, 12) 
END; { Of PROCEDORE Read“Track } 


PROCEDURE Write Track (TRACK_NO: INTEGER); 
VAR START_BLOCK: INTEGER; 


BEGIN 

START BLOCK:= TRACK NO # 

UNITURITE (EMUL UNIT, 7 Bul SIZEOF (T_BUF), START BLOCK, 12) 
END; { PROCEDURE Grite Track 3 


FLNCTION Enuation_ Disk Verified: BOOLEAN; 
H oc 
INDEX: INTEGER 

CHK BUF : Pate ARRAY [0..7) OF Byte; 


BEGIN 

{ Check against the commands which actually set up Emulation Mode } 
CHK BUFO) := 173; CHK BUFEI]:= = CHK BUFE2):= 255; LDA OFFES ) 
CHK-BUFI3):= 9+ CH 4): 40 ) 
CHKBUFI5) := adi, CRK BUFI4) := hon, CHK BUFL7):= 255; ( 314 OFFE3 ) 
UNITREAD <EMUL UNIT, BLK, SIZEOF (BLK),~2, 12); {Read in block 2} 
FOR INDEX:= 0 70 7 60 

IF CHK BUFLINDEX) <) BLK(383 + INDEX)) THEN 


Emulation Disk Verified:= FALSE; 
pT (EmuTation_Disk Verified) 


EN 
{ If we get here, the bytes checked out } 
Emulation Disk Verified:= TRUE 
END; { Of FUNCTION Emulation Disk Verified } 


PROCEDURE Patch Character Set; 
VAR C_SET: SYS _U Set; 


PROCEDURE Get CSet; 
VAR C FILE: File OF SYS C Set; 
PATHNANE: STRIN 


10 RES, INDEX: MI ATEGER: 
CURSOR TYPE: CHAR: 


GIN 
WRITE ¢’Pathname of character set file: ’); 
sali (PATHNAME ) ; 


RE 
{$1 0CHECK-} 
RESET (C_FILE, PATHNANE) ; 
($1 0CHECK+) 
10 RES:= JORESULT: 
1F-(10 RES) = 0 TREN 
C SET:= C_FILE’ 
ELSE 


wl 
WRITELN (“Error in reading * ,PATHNANE, ‘ (JORESULT = ’,JO_RES,’)’); 
WRITE (’Pathname (<RETURNY to exit program): ”); 
READLN (PATHNAME ) 
IF (Length<PATHNNE) = 0) THEN 
EXIT <PROGRAM) 


END 
UNTIL (10_RES = 0); 
WRITE (’FTashing or Solid cursor? (F or $) aie 
READ (CURSOR TYPE); WRITELN 
FOR | = 754 to 263 DO ml Locations of bytes defining SPACE character } 
CASE CURSOR TYPE OF 
“F’ “47s TF (C SETLINDEX) < 128) THEN 
C_SETL INDEX) := C_SETLINDEX) + 128; 
es a Sf si SETLINDEX) ) 127) THEN 
C_SET{ INDEX) := C_SETLINDEX) - 128; 


END 
END; { Of PROCEDURE Get_CSet } 
PROCEDURE Patch Monitor; 
VAR KIP: PACKED ARRAY (. 48) OF Byte; { KEYIN PATCH } 


{ These patches for the td JE emulation monitor 
to allow lower-case letters are by George Oetzel. } 


PROCEDURE Set_Keyin Patch; 
BEGIN 


PPLO) = $32: KIPLL}:= 673 ( STY 43 } 
KIP(2}:= 134: KIPL3}:= 66: ( STX 42 } 
KIPL4) := 173: KIPE5):= 0; KIPLS):= 192; {( LDA 0C000 > 
KIP(7}3:= 168: ( TAY } 
KIP(9}:= 173: KIPE9}:= 8: KIPCIO):= 192;  ¢ LDA OC008 ) 
KIPE11}:= 1703 { TX } 
KIPL12}:= 44: ‘UPL3}: = 16; KIPLI4):= 192; { BIT OCO10 D 
KIPCIS):= 41: KIPEIS { AND #08 ) 
KIPL17):= 208: K)PL18) := j. { BNE +4 } 
KIPL19}:= 1523 ( TYA } 
KIPC20):= 146! KIPE2I):= 46: { LOX 42 } 


Program listing continued on page 40 
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Decision Support With VisiCalc 


Ge VisiCalc commands is the first step in making use of 
the program. Transferring to the screen what we used to 
do by calculator is the next step. But to put this powerful 
program's potential to work, you need to get involved with 
template design as an end product. 

There are more factors in template design than could be 
covered in a single column; certainly more than most of us have 
time to digest in a single list of instructions. The best way to 
learn is still, by doing. 

While in VisiCalc, whether studying an example template, or 
creating one of your own, begin with understanding what is 
needed from the information available. In this example, a 
weekend pilot needs the bottom line cost of an airplane with 
expected revenue and all the variable use-costs. 


When Is An Airplane 
A Good Investment? 

Our weekend pilot has been approached by the local 
rental/charter service to buy an airplane for his own use and 
rent it back to the service. The premise, of course, is that if he 
owns the plane he can fly for considerably less than for his 
current rental fee (on a per/hour cost basis). Renting the plane 
back to the service would make the capital outlay a tax shelter 
investment, while letting the rent collected make the loan 
payments. And the ownership worries could be kept to a 
minimum by the charter service handling all the little necessary 
details (for a small fee of course). The costs of meeting 
regulation requirements could be scheduled by the number of 
hours used. And on, and on. 

Coming from the Sales rep it sounds too good to pass up. In 
fact, it sounds too good to be true! 

As the weekend pilot peaks with interest, so does the list of 
unknowns and their effect on the bottom line. Like, exactly 
what are the costs associated with “x” number of hour’s use? 
What kind of savings could be had over the simple rent-by-the- 
hour fees? And what would the bottom line look like over a 
period of five years ? (Five years is the maximum loan period for 
a craft of that age.) 

The list of variables associated with the deal include: 
|. Capital Investment 

The combined total of down payment, loan amount and 
initial out-of-pocket costs. Down payment and out-of-pocket 
costs are included with the loan amount on the assumption 
that they would otherwise remain in savings. The forfeited 
interest which would been earned on savings is then “included” 
as part of the interest “paid” on the capital investment. 

2. Years 

The period of the loan, which is also a good measure of 
probable “investment life” for depreciation purposes, helps 
establish a time factor for our weekend pilot to balance against 
the other variables. 

3. Interest and % Annual Percentage Rate 

Most loans of this type are not simple interest (x% times full 
amount times full number of years). Declining interest (x% 
times a declining balance) comes to about half the simple 
interest fee. Amortized loans and “Rule of 78's” financing, are 
an altogether different matter. For this template, the Declining 
interest method is assumed to accommodate a rough average 
of the interest paid on a loan and the interest forfeited by 
withdrawing from savings. 
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4. Owner Tax Bracket 

This can be either the actual tax percentage (the percent of 
actual taxes paid from actual income at year-end) or the new 
dollars tax bracket (the percent of tax owed on new dollars). 
5. Owner Hours / Week 

Estimation of the average hours per week the owner would 
expect to fly whether in his own plane or through rentals. Since 
even the owner of the plane must pay his share of incidental 
use-costs, it was established that he would pay a discounted 
rental fee at time of use (the rent fee minus the commission 
normally retained by the rental service). 

6. Hourly rental fee 

The hourly fee charged to renting customers (assumed to be 
the same as that paid by the weekend pilot if he doesn’t buy the 
plane). 

7. Owner's Percentage 

A percentage of the collected fees goes to the service as 
commission fees, the remaining percent to the owner to meet 
expenses (and/or net a profit). 

8. Average fee hrs/mo 

Average number of hours per month in which paying 
customers will be renting the plane. (Owners use is accounted 
for in #4) 

9. Fuel cost per gallon 

The price of fuel per gallon changes from month to month as 
well as from airport to airport. Since all expenses including fuel 
are paid for from the owner’s portion of rental income, the cost 
of fuel can have a deciding effect on the fairness of the rental fee 
as will as on the bottom line investment value for the owner. 
10. Avg. Fuel per hr 

In most cases, this is figured as cruising speed consumption. 
Add 10-20% if much flying is done over mountainous terrain, or 
it student flying and ground maneuvers make up a large part of 
the use. 

ll. 50 hr. check 

The fee charged by the flight service station to make a 
customary inspection (and perform maintenance as needed) at 
mid-point between 100 hour intervals. 

12. 100 hr. check 

The fee charged for the 100 hour inspection and estimated 
normal maintenance. 
13. 1800 hr. check 

As above, but this one usually entails major engine overhaul 
and is best kept to minimum by making sure the 50 and 100 
hour maintenance procedures are followed religiously. 

14. Insurance / mo 

Owner's insurance for commercial-use craft, divided into 
monthly installments. 

15. Misc. / mo 
The template is designed for single screen width (standar 
8.5” wide paper). The top half is for variable input. The bottom 
half for calculation. Entries displaying “—O—” are user-input 
cells. The. actual algorithms used in computation are listed and 

explained below. 

Note that the interest figure in cell E4 displays ‘’0.00’° — this 
is a computed cell based on the interest figure entered in cell 
F4. Do not enter the interest dollar figure in E4 unless the 
financing is based on a finite dollar amount rather than interest 
percentage. 
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Computed cells in the bottom half will display “error” until 
numbers are entered above. In the blank template, those cells 
are trying to divide by 0, which always produces an error 
message. 


Airplane Investment 
re chante 


i 

$ 
Fs 
t 


Capital Investment ro =<G==' irs 
interest 8.68 --B-- 4% APR 
Suner Tax bracket SaBa> 

Ouner Hours “ week =-g== 

Hour ly rental fee a ee 

juner's Fercentage Saye 2 

Hverage fee hrs-mo a=¥== 

Fuel cost per gal --§-- 

Avg. Fuel per or aoe 

3 hr. check od co 

i8@ oor. check ==4-- 

1368 hr. check eee 

insurance * mc a a 

Hisc. “ mo a jae 


re ae ee ee ee gO JO CT ed 


Be CJ 


“hour ‘dau ‘month ‘qtr. year 


A written code list for template construction can be entered 
with a minimum amount of confusion if you understand what 
the code is telling you and how the template is effected by each 
entry. 

Most template codes follow a basic format Global com- 
mands are entered at the beginning. Individual cell information 
is listed either by rows or by columns — in this case, by 
columns. 

The cells which contain text (labels) are not listed. You can 
copy them easier from the example template. 

Each cell is identified by its coordinate, followed by the 
formula or format which is to be entered at that location; /.e., 
“B3:/FL” means put the cursor in column B, row 3, and enter 
“/FL” for left-justified format. 

Using the /R command (replicate) is sometimes easier from 
a line of coded instructions than from explicit instructions. You 
don’t have to know what it’s doing to make it work. Simply type 
in the exact characters in the code, press return, then enter ‘r’ 
and ‘n’ sequence and watch what happens. 

The first few codes are explained in detail as examples of 
how to trace the formula to the variables they use. The others 
can be traced easily by comparing their content-variables 
against the example template above. 

The replicate sequence at D23 is a little confusing to some 
users. Pay close attention to the reverse sequence of the (:) and 
(.) on the second and third lines. In the first line you set the 
format to general. 

On the second line, with the cursor still at location D23, 
enter /R for replicate. The edit line will begin with D23. Enter a 
(:), then E23, then a (.), and H23. Press RETURN. You will not 
be asked to enter ‘r’ or ‘n’ because you are simply replicating 
the general format from the single cell to each of the cells in the 
23rd row from column E through column H. 

On the third line, with the cursor still at location D23, enter 
/R for replicate. The edit line will begin with D23 as it did before. 
This time enter a (.) instead of a colon, then enter H23, followed 
by acolon (:), then D24. Press return. In this case, you will copy 
the series of cells from row 23 to row 24. You won't need to 
specify “where” on row 24 to end the sequence. That is 
determined by the “begin” and “end” points specified in the 
source. The destination is simply row 24 beginning at column 
D. 
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/GC9I 
/GFS 
Set Global column width to 9 (the default column width), and 
Global format to dollars & cents (rounded to 2 digits right of 
decimal). 
B3:1 
B3:/FL 
B4:/FL 
Enter the value (1) in cell B3. Enter left-justified format in 
cells B3 and B4. 
B4:1+B3 
B4:/R:B5.B16 r 
Enter the formula (1+B3) in cell B4, then replicate the 
formula from cells B5 to B16 as relative. 
D21:((E3/F3)/12)/(((E6*4.34)/30)+E9) 
D21:/R:D22 rnnn (note ‘rn nn’ sequence) 
Enter the formula as shown in cell D21 - ((capital invest- 
ment/years) /12 months) / (((owner hours * 4.34 weeks per 
month) / 30 days per month) + fee hours per month). Replicate 
this formula into cell D22 as relative (interest), no change 
(years), no change (owner hours), no change (fee hours). 
D23:/FG 
D23:/R:E23.H23 REM /R from cell to line 
D23:/R.H23:D24 REM /R from line to cell 
Fix the format in cell D23 as (general). Then replicate the 
format across the row from E23 to H23. Then replicate that 
sequence on row 23 to begin at cell D24. 
D2Z5:+E11*E10 
D26:.5*(E12/50) 
D27:(((E13/100)/18) *17) 
D28:(E14/1800) 
D29:+E15/E9+(E6*4.34)) 
D30:+E16/E9 
D32(38/100}*E7 
D33:(D24*E7)-(D32*D24) 
D34:((D32-@SUM(D25.D30)+(.2*D21)*E5/100)) 
/R D34:E34.H3¢4 rrrrn 
D36:@SUM(D32.D34) 
/R D36:E36.H36 rr 
D37:@SUM(D21.D30)-D23-D24 
/R D37:E37.H37 rrrr 
D39:(D36-D37)/R D39:E39.H39 rrrr 
D41:/FG 
E4:(E3*((F4/100) *F3))/2 
E5:/FG 
E6:/FG 
E8:/FG 
E9:/FG 
E11:/FG 
E21:((E3/F3)/12)/30) 
JREZIEZZ IN 
E23:+E9/30 
E24:((E6*4.34)/30) 
E25:D25*(E23+E24) 
/R E25:E26.E28 rnn 
E29:+E15/30 
E30:+E16/30 
E32:+D32*(E23+E24) 
E33:(E24*E7)-(D32*E24) 
F3:/FG 
F4:/FG 
F21:30*E21 
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JR FZLEZZ F336 

G2i3*F 21 

JRGZVGZ2Z:G33 0 

PIZILAZ EZ 

/R H21:H22.H33 r 

H41:/Fl 
H41:@IF(H39'0,F3*@ABS(H39),F3*(-1*H39)) 

The formula at H41 isn’t as complicated as it looks if you 
break it down into logical steps: If H39 is less than 0.. 
@IF(H39<0 
(then use) the product of F3 times the absolute value of H39 
»F3*ABS(H39) 

(else use) the product of F3 times H39 as a negative value 
ol 39 )) 

which produces a positive number if the bottom line figure is a 
PROFIT, or a negative number if the bottom line figure is a 
COST. 


USING THE TEMPLATE 
FOR DECISION SUPPORT 


After the blank template has been saved on disk, you're 
ready to start using it. We can begin with the numbers supplied 
by the flight service, and our weekend pilot’s estimate of tax 
bracket and weekly flying plans. 
$18,000 Capital Investment figure 

5 Years 
14.5 % APR 
32 % tax bracket 
3 Owner hours / week 
37.00 Rental Fee per hour 
80 % Owner's income from Rental 
30 Average Fee hours / month 
1.85 Fuel cost per gal. 
6.5 Average fuel per hr. 
150.00 50 hr. maintenance cost 
300.00 100 hr. maintenance cost 
5000.00 1800 hr. maintenance cost 
290.00 monthly insurance premium 
25.00 Miscellaneous 

Looking over the numbers gives our weekend pilot a pretty 
good picture of what the airplane purchase is going to COST in 
real dollars. Less than $6,000 over a five-year period is a more 
than reasonable price for the equipment. And dropping his 
rent-to-fly outlay by $7 an hour isn’t too hard to take. The 
problem is that he’s not really in the market to buy an airplane 
and these numbers make it clear that this isn’t a money-making 
venture. 

Our weekend pilot mentions the deal to a friend (another 
weekend pilot) who, along with being in a higher tax bracket, 
also flies twice as many hours per week on the average. 
Plugging his numbers into the template gives an altogether 
different outcome. We change the tax bracket figure to 42%, 
the pilot hours to 6 per week, and enter a 14% interest rate 
(weekend pilot #2’s personal banker is more flexible than a 
finance company). 

Based in part on the information derived from the template, 
Weekend Pilot #2 extracts a 35 fee-hours per month guarantee 
from the flight service and closes the deal.2 Try changing a 
few more of the variables to determine the investment 
feasibility. For instance, what if the price of fuel rose to $2 a 
gallon? What if the fee-hours increased to 40 per month? Or 
dropped to 20 per month? What if the owner didn’t fly for the 
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whole month? What if the rental fee was increased to $38 per 
hour? Or dropped to $32? 

Using a VisiCalc template for decision support allows you to 
know the outcome under enough different circumstances to 
make your decision what they should be. Informed decisions! 


Continued from page 37. 


KIP{22):= 1643 KIPL23):= 67; { LOY 43) 
KIP( 24) s= (RTS ) 
K1P( 25) := 153: ( TYA} 
KIP[ 26) := 201; KIPL27):= 193: ( CHP OCI ) 
KIP{28):= 48: KIP{29):= 246: ( BMI -10 3 
KIPL 30) := 015k KIPE31J:= 219; ( CMP HODB ) 
KIP{32):= 165 'KIPL33] = 242% ( BPL -14 ) 
KIP(34):= ( TYA 3 
KIPES5):= 41+ KIPE36) z= 2: ( AND #02 } 
KIPL37):= 1705 ( TAX ) 
KIPL38]:= 152: { TYA } 
KIPE39):= 224: KIPL40}:= 0 ( CPX #00 3 
KIPC41):= 208; KIP42]:= 233; ( BNE -17 } 
KIP(43) := { CLO) 

KIP(44):= 105; KIP(45):= 32: { ADC #20 } 

KIP{46}:= 208; KIPL47):= 226: { BNE -28 } 
KIP(48}:= 03 ( BRK } 

END; { Of PROCEDURE Set_Keyin Patch ) 


PROCEDURE Make Patches (OFFSET: INTEGER): 
VAR INDEX: INTEGER; 


BEGIN 
MOVELEFT (KIP, T_BUF [OFFSET+510), 49); 
T_BUF (OFFSET#187:= 127; 
T_BUF [OFFSET#19) := 234; 
T_BUF (OFFSET#20):= 234; 
TOBUF [OFFSET#40):= 765 


T_BUF [OF 3 
END; { Of PROCEDURE Make Patches } 


BEGIN ( Of Patch Monitor } 
Set_Keyin Patch; 
Read Track (5); 
Make Patches (3048): 
Write Track (5); 
Read Track (9): 
Make Patches (748) 
Write Track ¢ 
END; ¢ Of PROCEDURE Patch Monitor } 


Hae Patch_Applesoft; 


Read Track (7): 
T BUF (354):= 234: 
T BUF [355):= 2343 
Write Track (7); 
Read Track (8); 
T BUF [2168):= 127% 
T BUF (2173) := 234: 
T BUF Sas 234) 
Write T 
END; { a "PROCEDURE Patch Applesoft } 


aay { 1 Patch_Character Set } 
WHILE ‘i Emulation Disk Verified D0 


RITE (‘Please replace aN) disk in Unit #’ ,ENUL_UNIT, 
’ and press (RETURN), 
READLN 


Read tacks 
MOVELEFT (C_ Ce, T_BUF [2694], SIZEOF (C_SET)); 
Write Track (0) 
SW al aa 
Patch Ap Op eee 
END; { Of ROCEDURE Patch Character Set } 


PROCEDURE Introduction; 
VAR ACK: 


ar} 


BEGIN 
WRITE (CHR (28)): ( Clear screen } 
GOTOXY 70); WRITE (CHR (2)94 (Set viewport) 


Apple J{ Emulation Patcher’); 
WRITELN ¢’ by Al Evans’); 


$ 
WRITELN ¢’ with thanks to George Oetzel for the patch routines’); 
WRITELN + WRITELN ; 
WRITELN ¢’This progran will alter an APPLE J{ EMULATION diskette to permit’): 
WRITELN (’the use of the / Upper and lower case characters from any Apple ///’ F 
WRITELN (‘character set.’); 
WRITELN ; 
WRITELN (Before you use the program, you must Know two things:’); 


1. The PASCAL UNIT NUMBER of the disk drive which will hold’); 


WRITELN ¢’ the APPLE J{ EMULATION disk to be modified, and’); 
WRITELN ¢/ The PATHNAME of the file containing the character set you’); 
le c? wish to use in Apple JE emulation mode.’); 


WRITE ¢’ Seeks (ESCAPE) if you’’re not ready yet, <SPACEBAR> to continue: ’); 
Program listing continued on page 20 
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The Apple Writer WHAT? 


[" the market for a database? Maybe you don't need to buy 

one after all. “Uh, oh,” | can hear you from here: “W/hat do 
you know about my needs ?”, you say. “Look at this stack of 
paper on my desk. Without a database, how can | get it 
organized ?” 

OK. | hear you. But maybe—just maybe—you don't. My 
husband and | found we could do without one quite nicely. 
Bryan is in the real estate business. He has to struggle with 
loads of listings that need constant updating. I’m a writer. 
Besides articles like this, | write science fiction, and | learned 
early on that a fiction writer’s best friend is his notebook. 

Writer's notebooks grow faster than problems on a soap 
opera. Pretty soon they overflow in stacks and heaps on the 
table and spill over onto the floor. Transcribing the notes onto a 
disk isn’t the answer either; true, it eliminates the paper, but 
now stacks of floppies take up the slack. And somewhere in 
one of them is that absolutely fascinating idea about artificial 
intelligence | came up with a month or so ago. The question is, 
“where 2”. 

Obviously, we both felt the need for a database. But, good 
databases aren't cheap, are they? That’s when | took along and 
speculative look at Apple Writer ///. 

“A word processor ?” you Say. “C'mon.” 

Wait. Does Apple Writer /// know it’s a word processor ? 
\What if we told it to act like a database ? 

Apple Writer /// has some powerful features not found in 
most other word processors. One of them allows a single file to 
be as large as a disk. Another is its sophisticated loading ability. 
The two work together. If a file can be larger than memory, then 
it’s necessary to be able to load just a portion of that file at a 
time. That’s the secret to fooling Apple Writer /// into acting 
like a database. 

Take real estate for instance: In comes a customer with 
definite ideas. He wants a three-bedroom, two-bath ranch style 
house. Throw away those thick listing notebooks. Instead, let's 
create an Apple Writer /// database. 

Boot up Apple Writer ///. Then insert a blank, formatted 
data disk. At the top of the screen, type this: 

CODE: 
Below that, type this: 
FIELD 1<25-50k><50-75k >< 75-100k > <100-150k > <150- 
200k> <200k+> 
Field 1 is the listing’s price range, “k’ of course, standing for 
thousand. The figures can be adjusted any way you would like. 
FIELD 2 holds the number of bedrooms and baths: 
FIELD 22a 2S 2 2 et 

Now we need a search field that will look for the style of the 
house. If we use “CO” for colonial, “RA” for ranch, “RS” for 
rustic, “TR” for traditional, and “MO” for modern, Field 3 looks 
like this: 

FIELD 3 <CO> < RAS < RSS Ik MO] 

How about the size of the property? Is this house ona lot?A 
half-acre? An acre? Field 4 takes care of that: 
FIELD 4 =I 1 JAS AS AS 

Does the house have a pool? Is it a waterfront listing ? How 
about a tennis court? Does it have a fence? Is the property 
wooded? Or maybe this particular listing is pretty boring with 
no special features at all. Field 5 might look like this: 

FIELD 5 <<PL> <WF> <TN> <FN> <WD> <NO> 
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by Sharon Webb 


Let's add some notes. This will help you remember what 
those letters stand for later on. 
PL=pool 
TN=tennis 
\\/D=wooded 
\/F=waterfront 
FN=fence 
NO=no special features 

Put in other fields if you like—perhaps one to differentiate 
brick, wood, stucco, CBS construction, or one to designate 
different neighborhoods. Just don’t go overboard, or you'll find 
your database growing too complicated for easy use. 

At the end of the Final field, press RETURN and enter an 
asterisk: 

*[RETURN] 

Start typing in those listings now. At the beginning of each, 
put in the appropriate field information. A three-bedroom, 
two-bath, ranch-style listing might look like this: 
< 50100k> <3,2 > —KAS Ate WD 

Three bedroom, two bath Ranch in Oakmont Hill, Needs 
work. (And so on...) 

*[RETURN] 

The descriptive string of characters that begins the listing is 
your first delimiter. Notice the asterisk at the end of the listing. 
This is your final delimiter; it prevents those portions of your 
file that you don't want, from being loaded. 

Save the file. Let’s call it LISTINGS. To see how your 
database works, erase memory and type this: 
[L].d1/LISTINGS!ICODE:!*! 

Let’s pretend that the disk is full of listings. Your customer is 
looking for a house on several acres and he insists on woods. 
Price to him is no object, nor is size. 

Let’s look at the code: Field 4 has the entry <A+> (for more 
than one acre). Field 5 holds the code: <\WD> (for wooded). 
Place the cursor at the end of the document in memory (Ctrl 
E), then type this: 

[L].d1/LISTINGSIKA+> <WD>!*IA 

The final “A” tells Apple Writer /// to load All occurrences of 
<At+> and <W/D>. Make sure that “A” is typed in upper case. 
Also, be certain that your [L]oad instructions agree with your 
code. If your listing shows <W/D> and you request <wd->, the 
program will not find a match. 

\When you press RETURN, every listing on the disk that’s 
coded ‘multiple acreage” <A+> and wooded <WD> will load 
into memory beginning at the position of the cursor. If you like, 
you can load the listings without the delimiters by changing the 
final “A” to “NA.” If, however, you are not requesting a search 
of all fields (as in the above example), the delimiters not 
searched for will be loaded into memory. Voila! A word 
processor as data base! 

And so there we have it—Apple Writer /// as the perfect 
database. Well, no, not perfect. There are limitations, of 
course. Apple Writer /// can’t skip a field. If you try to load the 
code for Field 1 and Field 3, but leave out Field 2, the program 
won't be able to find the “word” you've used as a delimiter. And 
you won't be able to work math manipulations as you can in 
many commercial databases. Within its limitations, however, 
Apple Writer /// can be fooled into becoming a useful 
database—one with no restrictions as to the size of each entry, 


continued on page 31 
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he products outlined below have been received by ON 
THREE for the purpose of review. Some have been 
reviewed in the past and many will be reviewed in the future. 
The products have all been given that ON THREE ‘stamp of 
approval’. This is only an indication that the product works as 
advertised and is not an endorsement of the product by ON 
THREE. 


/1/ E-@ Pieces 


The advertisements say, ‘The first fully integrated word 
processor, spreadsheet and data base manager for the Apple 
///. Combines the power of the three most commonly used 
program types with the ability to easily transfer data among 
them.” - I say, “It Works!" 

Anin-depth review will be in a future issue, but for now let me 
give my initial impressions of this product. The three sections of 
the program /// E-Z Pieces are quality products in their own 
right, together they form a very useful package for the Apple 
/// user. 

The program author, Rupert Lissner is the person who 
created QuickFile. The data base of /// E-Z Pieces appropri- 
ately looks very much like QuickFile. With expanded functions 
and speed, it’s a good choice for your small to medium sized 
information handling needs. 

The spread sheet is also very good. Functionally speaking, it 
works much faster than either version of VisiCalc for the /// but 
it doesn't have all the features of Advanced VisiCalc. It will 
directly read VisiCalc and DIF files at very quick speeds, so don't 
be surprised when that large spread sheet that takes a half an 
hour to load under VisiCalc, loads in a minute under /// E-Z 
Pieces. 

The best part of the package is the word processor. Much 
better than Apple Writer, it comes very close to being better than 
Word Juggler. In a head on head comparison Word Juggler 
would win, yet because /// E-Z Pieces is an integrated package 
it wins hands down. 

This “Integration” allows you to directly cut a portion of your 
data base or spread sheet and transfer it directly to the word 
processor. Up to 12 files may be resident on the /// E-Z Pieces 
“Desktop” as you use the program and you can quickly move 
from one to another. 

While it is avery good package it does have anumber of small 
bugs that will be touched on in the future. This is to be expected 
with anew program and I’m sure that they will be ironed out in 
the future. The only major disappointment is the manual. A few 
hundred pages long it looks as if it was written as an 
afterthought. It’s a concise reference manual that needs some 
work. It’s possible that a single book can't fully describe this type 
of program and | think they should have split it up. 

Allin all avery nice package, that works nicely. Available from 
a limited number of dealers, the package is priced at $295 and 
will run on a 128K or 256K Apple /// system. 
haba systems, inc., 15154 Stagg Street, Van Nuys, California 
91405. (213) 901-8828. 


Catalyst Version 2.0 


The best selling hard disk boot program for the Apple /// 
has been improved with many of the problems of Version 1.0 
fixed. For those of you not familiar with Catalyst, it will install 
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New Products Received 


by Bob Consorti 


most any Apple /// program on your Apple ProFile hard disk. 
You can then choose the program from a menu and not have to 
restart the entire computer system each time you wanted to 
change a program. 

The most interesting feature of Catalyst Version 2.0 is the 
automatic program installation feature. Just insert the right 
diskettes and Catalyst will automatically put the programs on 
your hard disk. 

There is also a new ability to dynamically load drivers. All the 
drivers that your programs need do not have to be on your 
Startup disk. For example, you can have Catalyst load in the 
-GRAFIX driver only when needed by a program such as Business 
Graphics. This leaves more space for your other programs. 

However, even with dynamic loading of drivers, Catalyst 2.0 
takes up about the same amount of memory as the original 
Catalyst. This is due to the new enhancements. The current 
procedure for installing Pascal programs still has some major 
problems. For example, if you have a copy of our Draw ON 
graphics tool and the System Utilities or Lazarus installed under 
Catalyst there are problems. 

Draw ON /// requires that 32K of memory be reserved for 
graphics. If you do this you will not be able to directly use 
the Utilities program or Lazarus since they both require that 
OK of memory be reserved for graphics. To access these programs 
you will have to manually change the graphics space allocation 
before trying to use them. This is a very annoying problem that 
should be fixed. 

A sparse, non-typeset user’s manual is written on a technical 
level that is above most of the people who use the ///. For the 
3149 price tag it should be a bit better. While it will still 
work with only the ProFile and Micro-Sci drives it is an 
excellent package that will improve your productivity. 

Quark Incorporated, 2525 West Evans, Suite 220, Denver, Colorado 
80219. (303) 934-2211. 


KEYSTROKE 
Data Base & Report Generator 


The KEYSTROKE Data Base & Report Generator are 
the first in a series of Apple /// business software that Brock 
Software Products, Inc has announced. Very attractively 
packaged, these products look great from the outside. 

From the inside however there are some problems. While 
offering very powerful options and real relational features, the 
program is set up on a less than logical menu structure. Based on 
our tests, users have a hard time getting to learn the program 
but with careful study of the excellent manual they can master it. 

The KEYSTROKE data base allows you to design your input 
forms just like PFS. Defaults, computed fields and automatic field 
formatting make data entry avery easy process. Capabilities exist 
for merging VisiCalc, Apple Writer and PFS files yet it is not 
integrated in the respect that the program can't directly read 
those other types of files, a conversion process is needed. 

If you can master it, this can be avery valuable addition to your 
Apple /// program library. The relational features are really 
great. Cross referencing information from a number of files is a 
very important feature that is not found in most data base 
packages today. 

Brock Software Products, Inc., 8603 Pyott Road, Crystal Lake, 
Ilinois 60014. (815) 459-4210. 
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SOSTRAN, FONTWRITER, 
EASYTERM ///, INFONET 


With the introduction of these new products for the /// Sun 
Data, Inc. brings Apple /// users a number of low cost high 
quality items. 

SOSTRAAN is a program that copies files from your Apple 
/// format disks to your Apple Jf disks and vice-versa. This very 
useful utility allows you to transfer ANY type of file from one 
machine to the other. Basic, programs, text and data files, DIF 
Visicalc files, and even graphic photos can be transferred. The 
only unusual thing about this product is the manual - Typeset 
and bound in a binder, it’s too good for the price! 

FONTWRITER is a set of three powerful and easy to use 
utility programs for the ///. With FONTWRITER you can easily 1) 
Create and modify character fonts for the text and graphic 
screens. 2) Create fonts to form large logo-type displays and 
produce animated characters on the screen. 3) Modify the 
keyboard layout providing the user with complete control over 
what happens when a key is pressed. 

Again the strongest point of the package is the excellent 
documentation. The utility programs are very well described and 
are very easy to use. Complete with Appendices and tutorials, 
the manual makes operation of the program a snap. 

~ EASYTERM /// is a communications program that gives 
your computer the ability to send files created on your Apple 
/// to a remote computer and to receive data from a remote 
computer. Once again the manuals are excellent, better than 
most of the more expensive packages. 

The EASYTERM program is written completely in assembly 
language as an interpreter. This results in lightning fast speeds. It 
doesn’t have the ability to autodial numbers or some of the other 
things the more expensive packages offer but it is a great buy for 
the money. You can change your communications protocols and 
the general status of the program directly within the program. 
Everything occurs very quickly. 

INFONET is an information network program for those who 
need electronic communications between themselves and other 
computer users. It allows your Apple /// to act as an electronic 
bulletin board / message center. The users need only have a 
computer with a modem. 

Assigned users are allowed to communicate with INFONET 
at different levels, depending on the priority level assigned to 
them. INFONET can accommodate over 1,000 users, depending 
on the size of the hard disk used. 

Another package with an excellent owner's manual, ON 
THREE will be using this system when we set up our long- 
awaited bulletin board in a month or so. | 


All of these products can be ordered from Sun Data, Inc., 95. 


West 100 South, Logan, Utah 84321. (801) 752-7831. 


Basic Extension 


Basic Extension is a group of routines for the Apple /// 
Business Basic programmer that act as an extension to the Basic 
language. Written in assembly language, most of these routines 
will speed development work and program speed of Basic 
programs. | 

There are three general routines available: Disk, Array, and 
Utility. These are briefly documented in a sparse 5 page manual. 
While sparsely documented on paper, there are demonstration 
programs that show you how to use all the functions of the new 
routines. 
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The disk routines provide high speed disk read/write capabil- 
ities. You can speed up disk access by as much as ten times over 
the standard Apple /// Business Basic routines. A direct 
block-access program gives you access to any block of data on 
your diskettes. Also included in the disk routines is the ability to 
change a file type from within Basic. 

The array routines provide high speed manipulation of 
numeric and: string arrays. Insert and delete elements, move 
sections of an array and even transferring information from one 
array to another are all now possible. You can also search entire 
arrays for an occurrence of a single string. 

In comparison to the fast disk |/O and the lightning fast array 
searches, the utility routines are almost primitive. Many of these 
utilities (or Ones very similar) have been published in ON 
THREE magazine. The Font editor and Block editor supplied as 
demonstration programs are among the slowest and least 
sophisticated I've seen. 

The power of this package lies not in the demonstration 
programs (as the name impiies) but with the assembly language 
extensions to Business Basic that can speed things up tremen- 
dously. Foxware Products will allow your programs to use these 
routines for a small fee. It’s not the most powerful utility package 
for the /// but it does have a very useful purpose. 

Foxware Products, 2506 W. Midwest Drive, Taylorsville, Utah 
84118. (801) 364-0394. 


Attach Driver 


The Attach Driver is an Apple /// SOS Driver that allows 
text screen dumps from within any program. Compatible. with 
Catalyst, this Driver enables text screen dumps of both 40 and 
80 columns. 

This Driver doesn’t allow printouts of graphic screens - only 
text screens. It will however allow two special codes to be sent 
to your printer before each print. You can use these codes to 
toggle from two of your printer modes such as normal and 
condensed print. 

One of the “Features” of this driver is that a character will 
appear in the upper right hand corner of the screen before it 
prints. This is very annoying as it results in your screen being 
changed. On your printouts this character will also appear. 

It does work in all the programs that we have tested. In 
addition to the small problem reported above, the documenta- 
tion is somewhat lacking. This doesn’t really create a problem as 
enough is presented to get the driver onto your system, but a 
typeset instruction sheet would be nice. The Attach Driver lists 
for $29.95. 

SOFT-LIFE CORPORATION, 2950 Los Feliz Blvd. Suite 103, Los 
Angeles, California 93039. 


Aladin 


Aladin is a very powerful relational data base and problem 
solver. Very sophisticated, it brings relational data base and 
mainframe power to the Apple ///. Direct sorting capabilities, 
unlimited “key” fields and over 1 million records per file make this 
avery attractive data base system for the Apple ///. 

Talk about powerful, this package defies review. | should start 
out with what it will not do: 1) It won’t walk your dog; 2) It won't 
cut your hair. Aside from that I’m not sure what it can’t do. 
Almost everything that you could want in a data base is here. 

Fully relational, Aladin can access any number of files at once 
to give you the information you request. Report generation is 
built-in with sophisticated options for print formatting. A full 
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Query language is also implemented. For those of you who 
aren't data processing professionals, this simply means that you 
can access your data base with English like commands - not 
numbers or complicated formulas. 

There is a built-in provision for integrating with a stand-alone 
word processor such as Apple Writer. If you like the WPL of 
Apple Writer, wait until you see what this package can do! It’s 
been said the W/PL is a mini programming language inside the 
word processor. If that’s true (and it is) then Aladin has a built-in 
language that looks like it came from a mainframe - it’s powerful. 

Statistical analysis and charting also are built-in. | don’t know 
any other words to describe this package but - POWERFUL. 
For more information contact: The Advanced Data Institute, 
America Inc., New Products Division, 1215 Howe Avenue, 
Sacramento, California 95825. 


Copy /// 

Copy /// is a diskette copying utility program for the Apple 
///. Simply put, it will do a complete diskette copy and 
verification. Reading an entire 140K floppy disk into memory, it 
will make a copy of the disk in memory and then check the 
copied disk to make sure that there are no errors. 

Copy /// uses a very accurate verification routine to make 
sure that you have created an exact duplicate of your original 
diskette. Extensive options allow you to format the diskettes to 
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be copied and copy up to four disks sequentially at a time. 
Copy /// will also do disk copies with just the internal disk 
drive. Because the program reads the entire diskette into 


— memory, a 256K Apple /// is needed. For those of you who 


need accurate verification that the copies you create are exact 
duplicates, Copy ///is for you. Please note that it will only work 
on standard 140K Apple /// disk drives, the Micro-Sci’s and 
others are not supported. 

Digital Microware, P.O. Box 289 Los Olivos, California 93441. 
(714) 855-0555. 


Timesaver Taxes 


Timesaver Taxes is a tool for the professional income tax 
preparer. It will print all the common IRS forms and permit the 
totals from various other forms to be entered and used in the tax 
calculations. 

This program provides a fast and easy-to-use approach to 
individual income taxes. An aid to the professional preparer, it is 
not a substitute for the preparer’s judgment. The capabilities of 
the Apple /// are used to speed calculations and make data 
entry very easy. 

Annual updates are available that reflect the changes in the 
tax laws. State income tax packages are available upon request. 
C & H TAXES, Suite 29, 2002 So. St. Aubin, Sioux City, lowa 
51106. (712) 276-3362. 


WHAT YOU SEE jo WHAT YOU GET 


(on your screen) 


(on your printer) 


SOFT-LIFE’S NEW ‘ATTACH. DRIVER’ PRINTS YOUR SCREEN! 


® VisiCalc printouts 
in condensed print 
- easily; 


Look at this''! A screen dump from an Apple /// by 
using the new “Attach. Driver". 
WORKS WITH ANY PRINTER AND WITH ANY S.0.5. PROGRAM! ' 


® Print a catalog of 
Apple Writer files; 


1 
CLOOK !:!. -)-}-) APPLE /// TEXT SCREEN DUMP 


NO EXTRA HARD-WARE ! ! 


@ Make hard copy 
printouts of menus; 


® Works with any printer 
- any printer driver; 


You can make copies of your menus or your help screens 
or a page full of any text whatsoever!! Works with 


® Print Help screens 
from any program: 


Pascal and with Basic. Works from within a commercial 
program or from the programs you write for yourself. 


® Works with any 
SOS program. 


NOTE: THIS IS A TEXT SCREEN DUMP DRIVER AND DOES NOT 


PRINT GRAPHICS. 


BONUS: NOW you can ALSO send any two printer codes to your 


ASK FOR 
ATTACH DRIVER. 


New Products Coming! Exclusively for 
Apple III! Write for Details. 
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printer. This means you could toggle your dot-matrix 
printer from condensed to normal and back to condensed 
with a single keystroke! ! Or pick any twe functions of 
your particular printer and they can be toggled on ard 
off without fuss or muss!! 


“Actually printed from a VisiCalc program”’ 


Sih SOFH~LIFE CORPORATION 
2950 LOS FELIZ BLVD., SUITE 103, 
LOS ANGELES, CALIFORNIA 90039 
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Only $29.95 + tax 
(add $1.50 for shipping) 


ON THREE 


11 LM 111 VLA 41 hh LL 


Book Review 
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by Dana E. Wilson, M.D. 


ELECTRONIC LIFE. How to Think About Computers. 
Michael Crichton. Alfred A. Knopf. New York, 1983. 209 pp. 
12.95 retail. 


The author of The Andromeda Strain, Five Patients and 
Eaters of the Dead has turned his considerable talents loose 
on a book about computers! Lest you wonder whether a 
physician, writer and film maker is a dabbler and Johnny- 
Come-Lately to the computer scene, Dr. Crichton has been 
involved with computers since the mid-60’s and pioneered in 
introducing computer graphics to the film industry. He is a 
highly informed afficionado who transmits his own enthusiasm 
to his fans. 


Crichton began the book as a series of instructions to 
friends, written on his word processor. These instructions 
grew to monograph size. The book might be mistaken for a 
catalog of computer terms. Don’t dismiss it as another “ABC” 
computer glossary, though! Crichton subtitles it “How to 
Think About Computers” and therein lies the key to its appeal. 
It is an effective exposition of the author’s own perspectives 
about computers, even though its informational content Is 
slim. Each of the entries is really a micro-essay filled with 
humor, observations, and philosophy. As a glossary it’s inade- 
quate, and because of its glossary format, it is sometimes 
repetitive. But as an example of good writing, it’s a gem. It is 
pitched at the beginner, but there is something in it for everyone. 

Several BASIC programs are appended. They are intended 
to introduce beginners to computers, and give them the 
confidence needed to progress further. This will be of little 
interest to ON THREE '’S readership. 

Electronic Life more than vaguely resembles Christopher 
Evan's The Making of the Micro Millenium. If you liked Evan's 
you will enjoy Crichton, repetition notwithstanding. His con- 
cise sentence structure reflects careful thought, like an elegant 
line of code. 


Why am | reviewing this book in ON THREE? Because 
Crichton did us a disservice twice! He capitalizes on Apple 
///‘s difficult birth as an example of why one should never buy a 
micro early in its marketing cycle. Sadly, he never points out 
that the /// has become an outstanding machine. Secondly, he 


implies that it is essential to have CP/M. Neither position is fully 
explained. The /// ends up the worse for it. 

My recommendation to ON THIREE’s readers, unless you 
are anxious to introduce a novice to the mysteries of com- 
puting, wait until Electronic Life appears in paperback. The 
book is worth reading, but for $12.95, Apple /// owners can 
wait until later in its marketing cycle! //7 


Call THREE: Hot Line 


The Call THREE: Hot Line is a service whereby Apple /// 
users with problems can call a relatively local number to get 
help. The people answering the phones are fellow Apple /// 
users who have volunteered to help others over the rough spots. 
If you Know enough about your machine to answer ques- 
tions, please write in so we can include you in a future listing. For 
those who write in, please state your areas of expertise and the 
hours during the week you are willing to take calls. 

For those of you who need questions answered: PLEASE call 
only within the hours specified. Also note any time zone 
differences. If these volunteers start getting calls at all hours, the 
service will have to be discontinued, so PLEASE follow this 
guideline! 


Legend 

Accounting: AC Graphics: GR 
Assembly Language: AL Pascal: PA 
Cobol: CO Spread Sheet: SS 
Education: ED Quark: QU 
General Use: GE Agriculture: AG 
Modems: MD Catalyst: CT 
SOS: SO Data Base: DB 
Word Processing: \W/P Fortran: FO 

][ Emulation: AE Micro-Sci: Ml 
Business Basic: BB Profile: PR 
CP/M: CP Telecom.: TC 
Financial: Fl 


Under the topics column, there are two character mnemonics 
that specify the individuals area(s) of expertise. They are outlined 
above. 


Hot Line Listing 

Name State Phone Number 
Coville \/oodburn NH (603) 863-5590 
Harry T. Hanson, Ph.D. NJ (201) 467-0712 

Edward N. Gooding Sr. VA (804) 747-8751 

Al Johnston FL (904) 739-1042 

Paul Sanchez FL (305) 266-5965 
John & Lisa Beckett MO (417) 678-2500 
David B. Hays KS (316) 722-1242 

Art Schumer ND (701) 282-7907 
Terri \/iles CO (303) 850-7472 
Jeff Fritz CA (415) 864-2600 
Carl & Anita Reynolds CA (714) 734-9324 
Wayne Hale CA (619) 450-3856 
Dennis R. Cohen CA (213) 956-8559 
Kelly C. McGrew WA (206) 943-8533 


Days Hours Topics 

M, Tu, Th,F 7-8PM CT, OU 

M-F 6-9PM GE 

M-Su 6-9PM CO; SS,-PR; MD CT 
M-F 9AM-6PM (SE 

M-Su 1OAM-4PM SSFR CT: 

M-F 6-9PM iE 

M-F 7-11PM GE 

M-F 6-10PM AL, BB, GR, SO, SS, AE 
M-Su IOAM-6PM PA 

M-F 6-9PM BB 

M, Tu,F 4PM-9PM GE 

M-F 7-11AM BB, GR, CT 

Su-Th IOAM-10PM GE 

M-Su 6-10 PM DB, GR, PA, SS, PR, MD, CT 
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Continued from page 48. 
PROGRAM Radiate; 


IICELISIILILOlitiieeeeetireeeettiieeeeritcriiitiiritit tr? ms) 

# Radiate -- by Dennis Cohen # ; 
Mavens i 

{ # This menu driven program will present you with three # ) 

( # colorful graphic demonstrations. #) 

TUTE TILIIErIIIetttirceeriiirretiititeeeritrriiitrrriiiit tt? me) 


USES PGRAF, REALMODES, TRANSCEND, APPLESTUFF 


CONST 
xmax = 139 ( Set it up for COLI40 ); 
ymax = 191 

VAR 


number: integers 


FUNCTION rndcolor: screencolor { Utility function ); 


VAR 
color: screencolor; 


BEGIN 
CASE (J + (random MOD 16)) OF 
1: color := bla 


2: color := magenta 
3: color := darkblue; 
4: color := purples 
3: color := dar pen 
6; color := grey 
7; color := nedbl ue} 
B: color := lightblue; 
9: color := brown; 
10: color := eeangt 
1}: color := grey2; 
12: color := pink; 
13: color := green; 
14: color := yellows 
15: color := aqua; 
16: color := white 

END; ( Of CASE ) 


rndcolor t= color 
END; ¢ Of FUNCTION rndcolor ) 


PROCEDURE fourcorners: 


CONST 
maxchange = 100; 


VAR 
anglel, angle2, angle3, angle4: real; 
cl, c2, c3, c4, dl, d2, d3, 4: integers 


PROCEDURE line (x1, yl: integer; var al: realy d: integer); 


VAR 
x2, y2: integer: 


BEGIN 
pencolor ae) 
moveto (xI, i 
12 t= xf 4 TRING (ymax. # CDS (al) 
y2 := y} 4 TRUNC (ymax # SIN (al) 
lineto es y2)3 
al := a) 4 4 

END; ( | PROCEDURE line ) 


Bey { PROCEDURE fourcorners ) 
initgraf ix} 


angle! : = $. d) i= -1; cl := -1; 
angle? := 270: d2 = 1s (235 | 
angle3 iy 270} d3 := -; (3 t= -{; 
angled : d4 := |: c4 3= 43 
arf nod “thoutan, 1); 

iVcolor (rndcolor) 
4illport; 
ta 

hs (al ) -maxchange) DO 


wilt (angled )= 0) DO 
BEGIN 

JF Keypress THEN 
BEGIN 


UNITCLEAR (1); 
an (fourcorners) 


tine ae 0, anglel, dl); 
line (0, max, angle? m1 
line (xmax,, mar, angles 
line (xmax, 0, angle dd) 


END; 
di := di ¢ chy d2 s= d2 4 c2; d3 := d3 4# c3y 04 s= d4 4 4; 


WHILE (angle! {= 90) 00 
IF perness THEN 
BEG] 
UNITCLEAR (1); 
EXIT (fourcorners) 


END; 
Vine (0, 0, anglet, -d1); 
line (0, ymax, angle2 4 
vee (xmax, rm angles 3)5 
line (xmax, 0, angle d4) 


END; 
an Na chy d2 := 62423 d3 := d3 # c3; d4 s= d4 4 4 


END; ( Of PROCEDURE fourcorners ) 


PROCEDURE screenfill; 


CONST 
maxchange = = 100; 
xcenter = 703 
ycenter = 963 


VAR 
change, x, y# integer; 


PROCEDURE line (xJ, yl, x2, y2s integer); 
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BEGIN 
pencolor (radcolor); 
nove to (tl, mt 
lineto (x2 2) 

END; ( Of PROCEDURE Vine ) 


BEBIN ( Of PROCEDURE screenfill ) 


a 
Hed 1 = 0; 
titcolr or redeslon)| 
i 


Site (COL140, 1)3 
afixon; 
FoR R change = | TO maxchange 00 
PENILE (y (= ymax) 00 
BEGIN 
IF BS aa THEN 


UNITCLEAR (1); 
EXIT (screendill) 


line ticenttes ycenter, xX, y)$ 
y t= y 4 change 


END 
WHILE (x (= xnax) DO 
BEGIN 
IF oi ha THEN 


BEG] 
UNITCLEAR (1)4 
EXIT (screenfill) 
END: 


line ixcenter, ycenter, xX, y)} 
x 3= x + change 


END; 
WHILE <y d= 0) DO 
BEGIN 
JF ee ae THEN 
BE 


6] 
UNITCLEAR (1); 
EXIT (screentt11) 
END 
yee txcenter, ycenler, x, y)§ 
Yer = change 


END; 
WHILE (x d= 0) 00 
BEGIN 
IF A ee THEN 


UNITTCLEAR (1)3 
on (screendi Il) 


line red En ycenter, x, y)} 
X 32 x - change 


END 
END; ( Of PROCEDURE screenfill } 


PROCEDURE circleradiate; 


CONST 
maxchange = 12; 
maxradius = 603 


VAR 
xcenter, ycenter, radius: integer: 


PROCEDURE circle (xc, yc, ra: integer); 


CONST 
maxrotations = 43 


VAR 
angle: real; 
change: integer: 
color: screencolor; 


BEGIN ( Of PROCEDURE circle ) 
OR change := 1 10 1 4 (random mod maxrotations) DO 
a 
i = Oy 
HILE jangle (= 360) DO 


BEGIN ene THEN 


UNITCLEAR (1); 
EXIT (circleradiate) 
END; 
color t= rndcolor; 
pencolor (color); 
moveto (xc, yc); 

( The following nul ti plication factor on the x-coordinate is 
to scale the output to more closely resemble a circle -- 
the standard viewport is 8.5 inches horizontally by 6.5 
inches vertically, which Le that the dot ratio is 910 
to 1632 or approxinately 0 

Vineto (xc 4 TRUNC (0.56 # ra # COS (angle)), 
yc 4 TRUNC (ra # SIN (angle))); 
mes = angle + change 


END 
END; ( Of PROCEDURE circle ) 


BEGIN { Of PROCEDURE circleradiate ) 
initgratix; 
rafixmode (COLI40, 1); 
illcolor (rndcolor) 3 
fi) }port; 


or rafixon: 
uit wot Keypress 00 
sg te = random MOD (xmax ¢ 1); 
ycenter := random MOD (ymax 4 1); 
radius := (random MOD maxradius) + 10 
{make sure it’s at least 10 dots ); 
. circle (xcenter, ycenter, radius) 
END; ( Of PROCEDURE circleradiate ) 
BEGIN ( Of MAIN Program ) 
REPEAT 


WRITE (chr(28)); 
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GOTOXY (40, 5); WRITE (’RADIATE’)s ( bars 11-13 ) WRITELN (’PAPERBACK WRITER!’)3 
GOTOXY (20, 8); WRITE (70 -- Quit’); Note (0, Eighth DIV 2); Note (G6, Quart) 
GOTOXY (20, 9); WRITE (’1 -- Simple Screen Radiate’); Note (6 een Note (B 4 Flal, Quart); 
GOTOXY (20, 103; WRITE (’2 -- Circle Radiate’); Note (Cd, Threq); Note (C2, Threg); 
GOTOXY (20, 11); WRITE (“3 -- Radiate from 4 Corners’); END; ( Ppback ) 
GOTOXY (0, 23); WRITE (Which? ’); 
texton (Now that the screen’s full, turn it on ); PROCEDURE Martha; 
READLN (number) (Non-numeric input will crash the program ); BEGIN 
CASE number OF A GOTOXY (0, 10); 
1: screendilly (barf) WRITELN (Martha, my dear’) 
2: circleradiates Note (6, Quart); Note (B¢ Flat, Half); Note (C2, Quart); 
3: fourcorners { bar 2) Note (6, Half); WRITE (’Though I "ys 
END Note (B # Flat, Quart); Note (C2, Quart}; 
UNTIL (number = 0). (bar 3) WRITE (’spend ny er 
END. ( Of PROGRAM Radiate ) Note (6, Threg); Note (A, Quart); 


(bar 4°) WRITELN (days in conversation’); 
Note (B ¢ Flat, Quart); Note (B 4 Flat, Quart); 
Note (B ¢ Flat, Quart): Note (A, Quart); 
{ bar 5 ) Note (C2 Half); Note (B+ Flat, Half); 
( bar 4) URITELN (’please’); Note (A, Full + Quart); 
( bar 7 ) WRITELN (‘Remember me’); Note (B ¢ Flat, Quar'); 
Note (A, a Note (6, Quart); 
( bar 8 ) Note (F, Full); 
{ bar 9 and 10 ) WRITELN (’Martha, my love’) 
PROGRAN Beatles; Note (A # Flat, Quart); Note (B+ Flat, Quar i 
Note (C2, Quarl); Note (B+ Flat, Full # Quart); 
MELIIITIrretrrrreieeeerteeeeeeeeeeeereeeereetLeeeeretecectt mm) (bar 11°) URITELN (’Don’’t forget ne’) 
{ # Beatles -- by Dennis Cohen u) Note (A # Flat, Quart); Note (C2, Quart); 
Rema 3 Note (E2 ¢ Flal, Quart}; Note (D2, Quart 4 Full); 
( # This program will sound out some of the favorite t) (bar 13.) URITELN ¢’Martha, v4 dear”); 
( # Beatle’s melodies of all time - on your Apple ///!' #) Note (A ¢ Flat, Quart); Note (B ¢ Flat, evant) 
ORTTITICtTiirereriiticrrirerireerereritiititrtititiittrit etme) Note (C2 Quart); Note (B 4 Flat, Quart # Full); 


END; ( nar tha) 
USES APPLESTUFF 
PROCEDURE Fields; 
CONST ( Define the notes and tones for Apple /// ) BEGIN 


C1 ; He aed ee sp Fc say" nese! ee c el S URITELY Cut me take you down’); 
B= 59;' C2= db; D2= 6d: E2= bd) F2 = 45; 62= 6) Note B, Eighth); Note (B, Eighth); 
A2 = 49: B2 = 71; C3 = 72; Sharp= I, Flat= a F Full = bo; Note (C j Quart); Note (B, Quart); 
els 4d; Eighth= 10; Threq = 60; Quart = 20; rea haps aMenie se 
Note (D, Eighth); Note (E, Eighth}; 
PROCEDURE Page3; Note (A, Quart); Note (G6, Quart); 
BEGIN { bar 3.) Note (F, Half); WRITELN (’Strawberry Fields’); 
WRITELN (CHR (28)); Note (F, Quart); Note (6, Guart); Note (A, Quart); 
ND; ( bar 4) Note (D, Full); 
( bar 5} WRITELN Foal dL is real’): Note (0, Quart); 
PROCEDURE Sgt; : Note (F, Quart); Note (6, Quart); Nole (A ¢ Flat Quart); 
ie, I Ut Ud thon ot Renn Sar ete, gh 
P ; XY (0 ‘And nothing to get hung about’); Note ig ; 
‘y A y URITE Ube Ire ‘)s Note (E, Quart); MN aye )_ Hote (02, Eiohth), Note (C2, Eighth); 
( bar 2.) WRITE (’Sgt. Pepper’’s ’); Note (6G, Quart); ole Sv, CI i. WOre Wgnth)y 
Note (6, Quart); Note (G, Ovart); Note (6, Ouart); Note (6'¢ Sharp, Eighth); Note (A, Eighth); Note (B, Quart); 
(bar 3°) WRITE (’Lonely Hearts’); Note (C2, Half); MIN Teck, Pe he Recedentit 
Note Mee Quart); Note (B + Flat, halt); Note (B. E; hihhe ete Eooeth) i 
( bar 4 ) WRITELN (‘Club Band’); Note (A, Half); Note (6, Full); an e Ejonth): Note 8 Eighth). 
( bar 5 and 6) WRITELN (“We hope you will enjoy, the show.) Pete ee) EVeRinye tele (DY Eletn, 
Note (6, Quart); Note (A, Quart); Note (A, Quart); (bar 9°) ote lA. Eighth}: Rote (6. Threa): 
Note (A, Quart); Note (A, Quart); Note <A, Half); .( fiel y ENQHIN; ’ q; 
Note (A, Quart); Note (6, Quart); END; ( fields ) 


{ bar 7 and 8 ) = Note (6, Full); Note (6, Threq) ; 
WRITE (‘Ue’’re “): Note CE, Quart); facia a ie 
(bar 2) WRITE Usat. Pepper’’s ‘Ss 


: , Page3; GOTOXY (0, 10); 
a ROE ie ae Uc tp Char] ) WRITELN (When 1 get older’): 
’ ag y J Note (E, Eighth # (Eighth DIV 2)); 
{ bar 3.) WRITE (‘Lonely Hearts f Note (C2, Half); Note (D'? Shar Eighth DIV 2): Note (E, Eighth); 
° Y b] 
Chae Ad uni TeLN eootub Band'3 Note ta Half); Note (6, Eighth + Quart); Note (E, Quart); 
70; ‘, U { bar 2.) GRITELN (’Losing my hair’); 
Cee le he oe (6, Quart); Note (G, Eighth + (Eighth BIV 2)): Note (A, Eighth); 
WRITELN (’and let the evening go.--’); Note (A, Quart); MOVE SOs ELONIDT Pe WOKE IU Eighth + Halt); 
Note “ Quart); Note (A, Quart); { bar 3.) WRITELN (’Many years from now a 
( bar 11 ) Note (A, Half): Note (C2, Eighth); Note (E2, Quart + Eighth); 
ber 13 theo 14) N ea Note (6, Threg) pag arte CM ania 
ar ru ote re ote req); ar ote vart): 
Rr a tS i I CEI 2 ee EB 3 
ote (A, Half): Wote (A, Quart); Ole Wb, EIQ 19 i Note tA, EIQ } 
Note (A: Quart}: Note (A, Quart): Note (6, Quart); 
(bar 15 thru 20.) Note (A, Hall); Note (A, Quart); (bar 5’) URITELN (Will you still be sending me a valentine,’); 
ts tm at Bs Ry ANH a aren a2 
ote (6, Half); Note (6, Quart); ote arp, Eighth ¢ (kig ; 
Note (6, Quarts; Note (6, Quart) Note (D2, Eighth DIV 2); 
Note (6, Half) 5: Note (6, quar) Note (Eight + (Ei ith DIV 2))5 Note (C2, Eighth DIV 2); 
‘Sergeant Pepper’’s Lonely’ ote 4 shar i 4 (Ei )s 
SESS a ae TELL Hmane en 
ole vart)s Note ¢ vart): ar ote i ote 4 Fla art); 
Note (A, Halt) Note (A, Quart); Note (A, Half + Eighth}; ; 
ear ne 5 vat Dua ote (A, Half); : ane ‘5 wel Bic thea Ad "ys 
ote al4); Note (6, Full); ote uart); Note (C2, Quart): 
END: ( sot) Note (C2 4 Sharp, Quart); Note (D3, Quart): 
Ct Char 7.) WRITELN (bottle of wined); Note (E2, Eighth) 
PROCEDURE Ppback; Note (E2 4 Flat, Eighth); Note (D2, Eighth); 
BEGIN Note (C2, Quart’ Eighth}; Note (0, Quart); 
Page3; ; , (bar 8} URITELN (714 J°’d been out till i 
( bars J thru 5) WRITELN (’Dear Sir or Madam ’); Note (E, Eighth # A oe DIV 2))s Note (D 4 Sharp lee DIV 2); 
Note (E, Eighth); Note (F, Eighth); Note (E, Eighth); Note (6, Eighth + Quart); Note le, art)s 
Note (6, Quart); Note (6, ate { bar 9 ) RITELN (‘quarter to three’); 
Note (6, Eighth}; Note (6, elt : Note (6, Eighth ¢ (Eighth DIV 2)); Note (A, Eighth); 
Oe Shine oe , eer tel Note (F, Eighth); ee sf th ‘ na Eighth 4 Half); 
ote ig + Note vart): ar ‘Vould you lock the door?’) 
Note (6, Quart); Note (G, Eighth: Note (E2, Eighth); Note (E2, Quart); 
WRITELN (“Jt took me years to write, ’); Note (02, Quart 4 Eighth) Note (A, Quart); 


{ bar 11) Note (C2, Full); 


Note (A, Eighth); Note (B's Flat, duart) ( bar 12.) WRITELN (Wil) you still need me?’); 
Note (B ¢ Flat, Quart); Note (B 4 Flat, duart); Note (C2, Eighth # (Eighth sth 2))s 
WRITELN (’Wil) you take a look?’); Note (A Ey th DIV 2); Note (C2, Eighth); 
Note (A, Eighth); Note (6, Eighth); Note (ED 4 Flat Quart}; Note (02, Quart ¢ Eighth) s 
Note (A, Eighth); Note (6, Eighth); { bar 13 ) WRITELN (UIT you still feed me?”); 
Note (6, Half); Note (E, Eighth): Note (F, Eiohth): Note (C2, Eighth ¢ (Eighth DIV 2)); 
( bars 6 thru 10 ) WRITE (’Based on a novel ’); ele a Fi i, ge ail a el) 
Note (6, Quart) Note (6, Eighth); ote vart); Note (A, Quart ¢ Eig 
Note (6) Eighth; Note (6, Eighth); Cbar 14.) URITELN (“When I’m Sixty Fourd’} 
Note (6, Eighth); WRITELN (“by a man naned Lear’); Note (E2, Eighth); Note (E2, Quart + Eighth); 
Note (F, Eighth); Note (E, Eighth); Note (£2, Quart); Note (E2, Quart); 
Note (6, Quart); Note (6, Quart); { bar 15.) Note (C2, Half # Quart); Note (0, Quart); 
Note (6, He WRITE (‘And J need a job ’)3 END; (sixtyfour) 
Note (6, Eighth): Note (A, Eighth): 
Note (Bt Flat, Quart); Nole (B + Flat, Quart); BEGIN ( MAIN Progran ) 
Note (B ¢ Flat, Quart); Sgt; 
WRITELN (’so J want to be a pete writer,’)3 Fields; 
Note (A, Eighth); Note (6, Eighth); Martha; 
Note (A, Eighth); Note (6 gate. Sixtyfour; 
ee Nw ina 
ote i ; Note i ; H 
Note (E, Quart); "Note (F, Quart); ‘Note (F, Full): END. ( Of PROGRAM Beatles ) 
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Three Shorts 
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(Well, they're not that long!) by Dennis Cohen 


here are three programs listed here, two in Paseal and one 

in BASIC. The BASIC program, CIRCLE, requires that 

/BASIC/BGRAF.INV be online and is really just a part of the 

Pascal program RADIATE, and generates randomly sized and 

located circles of multiple, constantly changing colors on the 
screen. 

RADIATE is a menu-driven collection of three graphics 
demos taken from Tom Swan’s UCSD Turtlegraphics-based 
Moire routines and modified to take advantage of some of the 
///'s rather unique capabilities. All three of the demos use the 
COLI140 mode, so that if you want to use CP280 you'll need to 
change some global constants relating to screen size. 

The first routine (to fill the screen) just radiates lines of random 
colors radiating from the center of the screen to the edge, 
sweeping around the screen from the lower left hand corner. 
The circle radiating routine has been described above. The 
routine to radiate from the four corners just goes from corner to 
corner putting out randomly colored lines of random lengths at 
(you guessed it) random angles. Pressing any Ascii key will return 
to the menu, and a non-numeric input will abort the program 
with an |O-error. | should probably put some idiot-proofing code 
in at this point, but that’s not what the program is demonstrating 
(and I’m too lazy to do it due to lack of interest). 

The program BEATLES is an AUDIO demonstration, and 
does a Beatles medley including putting lyrics on the screen. 
Make sure that the CPU is running at a 2Mz max, otherwise the 
music will be unrecognizable, and all the notes will need to be 
changed. 

The program RADIATE will require the large SYSTEM.LIBRARY 
since it USES Applestuff (Keypress, Random), RealModes and 
Transcend (Trig functions), and obviously PGRAF. BEATLES 
requires just APPLESTUFF. 

Q ——- REM HAAR RAAT ERATE GAH RAAT TE RATD ERKAT EARNER TT ERATE 


REM * Circling Demo -- by Dennis Cohen i 
REM: 8c eee se =-<== t 


REM * This program draws a single circle and rapidly : 


j 

Z 

3 ° 

4 REM * changes colors of parts of the circle. 

5 REM HARE RRR EEA HEATHEN ES RATE EH END RH BEE 
j 
Z 


6 ON _ERR INVOKE’ /BAS]C/BGRAF . INV" 
Q PERFORM initorafix:OFF ERR 


CROSS WORD-SCRAMBLER 


..IS a computer program that is educational and makes 
learning fun. Unlike many software products, CROSSWORD- 
SCRAMBLER lets you ‘use your brain’. No, it’s not a “shoot ‘em 
up” type of arcade game...although you won't be disapointed| 
by the graphic displays and musical interludes. Instead, if you like 
being human and would like to work with a computer (rather 
than SUBJECT yourself to one), then CROSSWORD- 
SCRAMBLER is what you have been waiting for. 

Hundreds of different crossword questions will provide hours 
and hours of fun for the entire family. With CROSSWORD- 
SCRAMBLER you can turn your Apple ///_ into a true 
Personal Computer - one that is both powerful and 
entertaining. 

CROSSWORD-SCRAMBLER is sold exclusively through ON 
THREE Magazine for only $19.95. 
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30) PERFORN gradi xmode(/} ,41) 
40 = =PERFORM oradixon 

43 PERFORN fi llcolor (40) 

3006 PERFORM ih 
20) = max) oops/=INTCRND(2)35)44 
23 = ON KBD GOTO 1000 

36) FOR loopnunz=1 10 ces 

uO FOR anglex=0 10 340 STEP 2 

i) pete 62RNDC1) PERFORM pencotonvency) 

é0 ERFORN move to(470 ,A96 

BO ¥Z=INT (308008 ¢ ang] 04) 470 syA= INT ( SO¥SIN( ang) 6422496 
90 PERFORM line tot4xd Ay) 


b0 NEXT angle/ 

10 NEXT loopnumé 

220 = TEXT: END 

1000 IF KBD=27 THEN POP: TEXT :HOME:END 
iy ON KBD GOTO 1000 


Continued on page 46. 


THREE Tips by Bob Consorti 


D° you have a short tip that you would like to share? Send 

them to ON THREE in care of this column so that others 
can benefit from the things everyone finds out about the ///. 
Tip #1: 

RPS information is available at dealers - NOT Apple Technical 
Support. (Sorry about that Steve - B.C.] 

Tip #2: 

Why don’t the Micro-Sei drives work with CP/M version 
2.21? Just asmall bug. Change the device type of your Micro-Sci 
drivers from: El” to:“FT. 

Tip #3: 

Some Micro-Sci A143’s were shipped with the most recent 
drivers but not the errata sheet that describes the changes. The 
latest version of the Micro-Sci Drivers is 1.3. Use them with 
System Utilities V1.2. Utilities V1.2 does not allow you to 
change the Device Subtype, therefore in version 1.3 of the Micro- 
Sci drivers they have added a one byte configuration block. 
Substitute the configuration block for the device subtype in the 
manual and make the changes to the device configuration block 
whenever it tells you to change the device subtype. 7/7 


Lazarus /// 
(Undelete your deleted files!) 


How much are your important data files worth? $100, $1000? 
Even if you back up your files regularly, the one file you 
accidentally delete will be the one you haven't ever backed up. 

Wouldn't it be great if you could somehow regain those files 
you deleted? Well, with Lazarus /// - you can! Very easy to 
use, just insert the diskette with the files you deleted and 
Lazarus /// will recover it. A new standard in user friendliness, 
this program has on-line help and tutorial screens to aid in the 
rica anf the nraaram It even works with ProFile and other disk 
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If you would like to Spread Sheet from Basic or even use the 

program Headfirst to print heading for your program listings, 
this Disk Of the Month can do it for you! 


DOM #4 - Emulation Patch 


This disk contains all of the Pascal programs from the latest 
issue Of ON THREE. Included are the Apple ][ Emulation 
Patch program, which lets you use any Apple /// Font in 
Emulation Mode and the new Pascal startup program for 
Access /// that lets you AutoDial! 

Also on this DOM is the program and UNIT that lets you do 


calculations from within your Pascal programs! Not forgetting 
the demos, we have also put the Radiate Graphics Demo 
and the Beatles Music Demo on this DOM. Even anumber of 
pictures created by Draw ON are included. These pictures can 
be viewed with the program on DOM #5. It’s also packed with 
programs and information that you can use! 


DOM #5 - Access Draw ON! 


This disk contains many of the utility programs in the latest 
issue Of ON THREE. Included are the new Basic startup 
program for Access /// that lets you AutoDial and Ben's 
SUPER Slot Machine. 

All of the VisiCalc and WPL programs are included as well as 
the Circling Graphics Demo. One of the nicest programs on 
this DOM is the Draw ON /// Picture Demo. It will show 
some of the beautiful pictures that can be created with Draw 
ON. Included on DOM #4 and DOM #5 are a dozen creations 
of Draw ON for your viewing pleasure. 7 

For only $9.95 (plus $1.50 postage and handling) you can get 
any of these great packages. All five may be ordered for the extra 
low price of just $37.50 (plus $2.00 for postage and handling). 
Mix and match any of the DOM’s for the low prices shown 
below. Order today! 

Bulk and group purchase rates are as follows (any mix of 


DOM's): 2-9 disks: $7.50 apiece + $2 total shipping 
10-24 disks: $7.00 apiece + $3 total shipping 
over 24 disks: $6.50 apiece + $4 total shipping 


ON THREE O’Clock 


Calling all you time conscious Apple /// owners out there ? 
How would you like a working clock/calendar for your 
Apple ///? Just as it was originally intended (and now 
included in the Apple /// plus), this kit comes with a plug in 
clock chip with a battery backup. 

With an ON THREE O'Clock installed, any time you save or 
modify a file, the current time and date will be stored on disk. 
Thus you will now be able to tell which file you last worked on. 
Your programs can now use the Apple /// built-in date and 
time routines to give you an up to the second read-out of what 
time it is. 7 

Extremely easy to install and adjust, it is completely compatible 
with SOS and doesn't use up a slot! This is the one you have 
been waiting for! The package contains comprehensive instruc- 
tions and a Six Month Warranty! Iry and get that deal 
anywhere else! | 

Coupled with the ONTIME clock driver (see the ad.on inside 
front cover), the ON THREE O'Clock is an invaluable tool for 
everyone who has an Apple ///. What’s the best part? - The 
price! While others are selling their clock for S60 and up, we have 
broken the $50 barrier. Heck, we broke the $40 barrier! 

For only $39.95 (plus $2.50 for postage and handling) you can 
get the best little clock in town! See the Special Offer on the 
inside front cover for the ONTIME - ON THREE O'Clock 


2-9 clock sets: $36.50 apiece + $5 total shipping 
10-24 clock sets: $33.25 apiece + $7 total shipping 
over 24 clock sets: $31.00 apiece + $9 total shipping 


Bulk and group purchases must have one mailing address. 
Please use the attached envelope for orders. If the envelope is 
missing, send to: ON THREE 

Attn: ORDER DEPT. 


P.O. Box 3825 
Ventura, California 93006 


Or call (805) 644-3514 direct for a Visa or MasterCard 
order. | 
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( Well, theu re not that lono! by Dennis Cohen 


30) PERFORN oradixmode(/) 41) 
40 = PERFORM oradixon 


here are three programs listed here, two in Pascal and one 

in BASIC. The BASIC program, CIRCLE, requires that 

/BASIC/BGRAF.INV be online and is really just a part of the 
Pascal program RADIATE, and generates randomly sized and 
located circles of multiple, constantly changing colors on the 
screen. 

RADIATE is a menu-driven collection of three graphics 
demos taken from Tom Swan’‘s UCSD Turtlegraphics-based 
Moire routines and modified to take advantage of some of the 
///'s rather unique capabilities. All three of the demos use the 
COLI40 mode, so that if you want to use CP280 you'll need to 
change some global constants relating to screen size. 

The first routine (to fill the screen) just radiates lines of random 
colors radiating from the center of the screen to the edge, 
sweeping around the screen from the lower left hand corner. 
The circle radiating routine has been described above. The 
routine to radiate from the four corners just goes from corner to 
corner putting out randomly colored lines of random lengths at 
(you guessed it) random angles. Pressing any Ascii key will return 
to the menu, and a non-numeric input will abort the program 
with an lO-error. | should probably put some idiot-proofing code 
in at this point, but that’s not what the program is demonstrating 
(and I’m too lazy to do it due to lack of interest). 

The program BEATLES is an AUDIO demonstration, and 
does a Beatles medley including putting lyrics on the screen. 
Make sure that the CPU is running at a 2Mz max, otherwise the 
music will be unrecognizable, and all the notes will need to be 
changed. 

The program RADIATE will require the large SYSTEM.LIBRARY 
since it USES Applestuff (Keypress, Random), RealModes and 
Transcend (Trig functions), and obviously PGRAF. BEATLES 
requires just APPLESTUFF. 

Q ——- REM HAAR RAA TERRA TEAS RAHAT RAAT ERKAT TERA SERA TT ERAGE 
REM * Circling Demo -- by Deanis Cohen t 
REN -% ==<Ses=-S-5== & 
REM * This program draws a single circle and rapiely : 


REM * changes colors of parts of the circle. 
REM 3333323 38a ead ees 


JG ON ERR INVOKE"/BASIC/BGRAF. INV" 
20) «= PERFORM initoradix:OFF ERR 


CROSS WORD-SCRAMBLER 


..IS a Computer program that is educational and makes 
learning fun. Unlike many software products, CROSSWORD- 
SCRAMBLER lets you ‘use your brain’. No, it’s not a “shoot ‘em 
up” type of arcade game...although you won't be disapointed| 
by the graphic displays and musical interludes. Instead, if you like 
being human and would like to work with a computer (rather 
than SUBJECT yourself to one), then CROSSWORD- 
SCRAMBLER is what you have been waiting for. 

Hundreds of different crossword questions will provide hours 
and hours of fun for the entire family. With CROSSWORD- 
SCRAMBLER you can turn your Apple ///_ into a true 
Personal Computer - one that is both powerful and 
entertaining. 

CROSSWORD-SCRAMBLER is sold exclusively through ON 
THREE Magazine for only $19.95. 


TI fe Cap Pap ome 


48 


45 PEDENON 


oO 
i20 


Support 
Tip #2 

Why 
22)7 30 
drivers f 
Tip #3 

Some 
drivers t 
latest vi 
System 
change 
Sci. drive 
Substitu 
manual 
whenev 


Volume 2 — Number 1 


ibiemlan f Yr 
al 
o 
<U> | 4 
moig ”n!1OQ 
Za: = “ME 
int & Q| a 
Co mm) # 
5 xO < 
Pw D m-| 0 
i 2 O “| 
ON m aE 
. — 0) 4 
o Oo =F 
© m : 
© 5 Wi) o 
Oo) ced] <}| oO 
“TH 3 
O| m 
Viz 
m| 5 
a1 c 
| 2 
m| > 
©) 
> 


TIVIN Alda’ SSANISNG 


SALVLS GALINA 


AHL NI 
CGSAvw al 
AYVSSSOAN 
ASDVLSOd ON 


Lazarus /// 
(Undelete your deleted files!) 


How much are your important data files worth? $100, $1000? 
Even if you back up your files regularly, the one file you 
accidentally delete will be the one you haven't ever backed up. 

\Wouldn’t it be great if you could somehow regain those files 
you deleted? Well, with Lazarus /// - you can! Very easy to 
use, just insert the diskette with the files you deleted and 
Lazarus /// will recover it. Anew standard in user friendliness, 
this program has on-line help and tutorial screens to aid in the 
use of the program. It even works with ProFile and other disk 
drives! 

This program gives a first look at a new type of Apple /// 
program - incredibly easy to use. Described in detail in this 
issue, Lazarus /// is one of the few programs that you can’t be 
without. The best part?- Lazarus /// is only $29.95. Use the 
enclosed order form or call and place your order today! 


Disk Of the Month 


Do you have the time to type in the programs in each issue of 


ON THREE? Wouldn't it be great if there was a way to get all 
the programs without having to type them in? - There is, all you 
have to do is order the disk! 


DOM #1 - Extra Disk Space Plus! 


This disk contains all the programs in the January and 
February-March issues of ON THREE. Included are Disk 
Pak 1, which will give you four extra blocks of disk space on all 
your data disks (avery handy feature for those of you who don’t 
have a hard disk!); Disk Pak2, which lists the files on a directory 
using Pascal; all of the Graphics and Sound Demos and 
much, much more! 


DOM #2 - Changing the 
Characters Of Your Printer 


This disk contains a program that will do a most amazing 
thing, it will enable you to change the characters that your 
Apple Dot Matrix (or ProWriter) printer prints with. Now 
your DMP can print with the same characters that are shown on 
your text screen. Fancy Gothic letters and many other fonts 
are available to use on your printer. Complete documentation 
makes this program very easy to use. Also included on this disk is 
a program to list the files on your Apple J[ diskettes, all the 
other programs from the April-May issue, and many more 
Graphic demonstrations. 


DOM #3 - Changing Your Keyboard 


This disk contains all the programs in the June-July issue of 
ON THREE. Included is the program that lets you redefine the 
positions of the keys on your keyboard, all of the WPL programs, 
the Disk Formatting Utility, the Graphics Sketching tool 
and everything else! 

If you would like to Spread Sheet from Basic or even use the 
program Headfirst to print heading for your program listings, 
this Disk Of the Month can do it for you! 


DOM #4 - Emulation Patch 


This disk contains all of the Pascal programs from the latest 
issue Of ON THREE. Included are the Apple J][ Emulation 
Patch program, which lets you use any Apple /// Font in 
Emulation Mode and the new Pascal startup program for 
Access /// that lets you AutoDial! 

Also on this DOM is the program and UNIT that lets you do 


calculations from within your Pascal programs! Not forgetting 
the demos, we have also put the Radiate Graphics Demo 
and the Beatles Music Demo on this DOM. Even a number of 
pictures created by Draw ON are included. These pictures can 
be viewed with the program on DOM #5. It’s also packed with 
programs and information that you can use! 


DOM #5 - Access Draw ON! 


This disk contains many of the utility programs in the latest 
issue Of ON THREE. Included are the new Basic startup 
program for Access /// that lets you AutoDial and Ben’s 
SUPER Slot Machine. 

All of the VisiCalc and WPL programs are included as well as 
the Circling Graphics Demo. One of the nicest programs on 
this DOM is the Draw ON /// Picture Demo. It will show 
some of the beautiful pictures that can be created with Draw 
ON. Included on DOM #4 and DOM #5 are a dozen creations 
of Draw ON for your viewing pleasure. | 

For only $9.95 (plus $1.50 postage and handling) you can get 
any of these great packages. All five may be ordered for the extra 
low price of just $37.50 (plus $2.00 for postage and handling). 
Mix and match any of the DOM’s for the low prices shown 
below. Order today! 

Bulk and group purchase rates are as follows (any mix of 


DOM's): 2-9 disks: $7.50 apiece + $2 total shipping 
10-24 disks: $7.00 apiece + $3 total shipping 
over 24 disks: $6.50 apiece + $4 total shipping 


ON THREE O’Clock 


Calling all you time conscious Apple /// owners out there ? 
How would you like a working clock/calendar for your 
Apple ///? Just as it was originally intended (and now 
included in the Apple /// plus), this kit comes with a plug in 
clock chip with a battery backup. 

With an ON THREE O'Clock installed, any time you save or 
modify a file, the current time and date will be stored on disk. 
Thus you will now be able to tell which file you last worked on. 
Your programs can now use the Apple /// built-in date and 
time routines to give you an up to the second read-out of what 
time it Is. 

Extremely easy to install and adjust, it is completely compatible 
with SOS and doesn't use up a slot! This is the one you have 
been waiting for! The package contains comprehensive instruc- 
tions and a Six Month Seren Try and get that deal 
anywhere else! 

Coupled with the ONTIME clock driver (see the ad.on inside 
front cover), the ON THREE O'Clock is an invaluable tool for 
everyone who has an Apple ///. What's the best part? - The 
price! While others are selling their clock for S60 and up, we have 
broken the $50 barrier. Heck, we broke the $40 barrier! 

For only $39.95 (plus $2.50 for postage and handling) you can 
get the best little clock in town! See the Special Offer on the 
inside front cover for the ONTIME - ON THREE O'Clock 


2-9 clock sets: $36.50 apiece + $5 total shipping 
10-24 clock sets: $33.25 apiece + $7 total shipping 
over 24 clock sets: $31.00 apiece + $9 total shipping 


Bulk and group purchases must have one mailing address. 
Please use the attached envelope for orders. If the envelope is 
missing, send to: ON THREE 

Attn: ORDER DEPT. 


P.O. Box 3825 
Ventura, California 93006 


Or call (805) 644-3514 direct for a Visa or MasterCard 
order. 


ON THREE 
Proudly announces... 


Draw ON /// is a powerful and versatile graphics tool 
designed exclusively for the Apple /// and Apple /// plus 
computers. Draw ON /// transforms your Apple /// into a 
combination drafting table, easel and sketch pad. Draw ON 
works in all of the Apple ///’s color and Black/White graphics 
modes and brings the power of LisaDraw and MacPaint to 
your ///, 


Draw ON /// provides powerful cut and paste facilities with 
the ability to create unlimited libraries of your own special 
figures and objects (such as circuit components, business 
logos, animation characters...). You may select these objects 
and move them onto, between, and around any of the many 
drawing screens. 


Apple /// plus Schenatic: Main Logic #2 
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Objects may be “shrunk” or expanded, rotated, textured and 
inverted. They may be moved on top of objects already inthe 
screen, behind previously drawn objects, or overlayed along 
with other figures on the screen. You can also zoom inona 
particular portion of the screen to do detailed work. 


The screen that Draw ON uses is a window into a much larger 
document. Draw ON allows you to scroll to different parts of 
the document at will. With the addition of the popular PKASO 
Printer Interface, Draw ON can directly print your drawings to 
a variety of Dot-Matrix printers. The Black and White Pictures 
on this page were each designed in less than 30 minutes and 
printed on a standard Apple Dot-Matrix printer. (To print the 
color pictures you will need an appropriate color printersuch 
as the IDS Prism.) 


On the color drawing screens you may paint with the Apple 
///s 16 colors and over 1000 pseudo color-texture 
combinations. And on all of the drawing screens there is no 
limit to the types of “Brush” that you can use. Simply pick-up 
any object and draw with it. 


Draw ON /// ras Mastery Over ae 


You can also mix text directly with your drawings. A variety of 
fonts are supplied in sizes up to 14 x 24. If you don't like any of 
the typefaces that come with Draw ON you can design your 
own! You can label your drawings with any of these fonts and 
even use them in your other programs. 


Features such as “rubber-banding” of lines, user adjustable 
grids, built-in help screens and easy to follow menus make 
Draw ON /// the ONLY graphics package for the Apple /// that 
is both powerful and simple to use. Combined with an 
excellent instruction manual, you can be doing useful work in 
less than an hour. The only limit to what you can do with Draw 
ON is your imagination. 


Draw ON gives an individual the power of a graphic arts 
studio. Use it in creating charts, preparation of slides and 
tables for presentations, and letterhead design. With Draw 
ON you can make changes to the dull graphs that your other 
programs create by adding borders, textures and different 
typefaces. Even Computer Aided Design applications such 
as circuit layouts, drafting, and flowcharting are now possible 
on you Apple /// with Draw ON ///. 


[a Cursor + [Scale | Prosran Status L 
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A Shape Utilities 


accep’ ESCAPE to abort 
Use arrous to highlight a selection 


Program Requirements: 


Apple /// with 256K or an Apple /// plus 
B/W Monitor (A Monitor /// is recommended) 


Optional Equipment: 


Cursor /// Joystick (or equivalent) 
RGB Color Video Monitor 
PKASO Printer Interface 
Dot-Matrix Printer 


Suggested retail price: $129 


Available at finer computer stores everywhere 
and directly from ON THREE. 


Dealer inquiries invited. 


